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MONTH 


As well as our regular featurs, waiting 
for the off we have a review of 
PROSPERO PASCAL for 
programmers, PART 5 for followers of 
database DBQL, the second instalment 
of SYSTEMATIC MACHINE CODE 
PROGRAMMING, a ONE MAN’S 
SYSTEM about Archive, lots of reviews 
and some programs. 


igital Precision are pleased with 

the initial reaction to their new 

word-processing program, Per- 

fection. There have been quite a 
few complimentary letters from proud new 
users. What criticism there has been ap- 
pears, mostly, to relate to misunderstand- 
ings about the use of the program. As with 
almost any program, there will be many 
second thoughts after the initial release, 
some resulting from user feedback, others 
from the producers’ own experiences 
during long-term use of the program. It is 
something of a truism in the micro world 
that no program is fully functional until 
version 3, but Perfection works well at 
version 2. 

One thing that confused me was the 
mechanism for saving SuperBasic files. 
There is no problem loading them — just 

| use the normal Load command — but the 
fact that they are ‘plain text’ means you 
cannot use the Save command if you want 
the SB program to run. Using the Export 
File command is the answer, but it may not 
appear to be so in some circumstances. If 
changes are made to the file, but the 
ENTER key is not used during the making 
of them, all should be alright. However, 
use of the ENTER key introduces a code 
into the file which will prevent subsequent 
running of the SB program. You can see if 
codes are present by using CTRL-H to 
display them. The remedy is simple — 
switch the Line Wrap function off before 
loading. Additional comment on this is 
likely to be put into updates to the instruc- 
tions. 


Cut and Paste 


One function which seems to be missing 
from the QL utility scene is a routine for 
doing Cut and Paste operations on text, 
from program to program. For example, 
copying a database record complete with 
formatfrom, say, Archiveto text’ while both 
programs are loaded in the QL, during the 
same session. Flashbackcan do the paste 
part, but it really needs a program which 
‘sits above’ the other programs to be able 
to both cut and paste. This is done in 
various forms on the PC and could pre- 
sumably be implemented on the QL too. 
The ‘ideal’ form is where the two programs 
are linked, so that the required section is 
actually copied from program to program, 
and any alteration in the original data is 
reflected in the copied data, in the other 


Bryan Davies tries out 
Perfection, and Phil 
Borman’s SUB routines 


program. This function has come to be 
called DDE (Dynamic Data Exchange) 
and must be something many users have 
dreamed of. Amuch simpler, but generally 
adequate, method is to copy the screen 
and transfer that. This works well when the 
screen contains text, but is not good for 
graphics. The mechanism is to make the 
source program the current job, activate a 
Mark function, and use the cursor — now 
tied to the supervisor program —to mark an 
area of text, by pressing ENTER at top left, 
then bottom right. You then switch to the 
target program, call up the supervisor 
program, and directitto transfer the marked 
screen area. The text from the marked 
area then appears at the cursor point, and 
is inserted character by character, rather 
like being typed in; it looks very much the 
same as entering text from an ALTKEY, 
KeyDefine, or such. 

My problem with printing on alaser printer 
from Professional Publishernow seems to 
have vanished, without the reason being 
apparent. Printing a full page from 1- to 3- 
pass, is now successful; the output is no 
longer spread over several pages. One 
possible reason is that the printer may 
previously have been set to Landscape 
instead of Portrait. On the laser, there 
doesn’t appear to be anything to be gained 
from using more than one pass, and five 
passes still cause a print to be spread over 
two sheets. Since the FX80-emulation 
mode has to be used, the image quality is 
generally much the same as with a dot- 


A sample 
screen from 
Perfection. 


matrix printer, although it should be appre- 
ciably better on areas of solid black. 

While on the subject of printing, another 
improvement in my screen dumps has 
come about through a little more reading 
of the Trump Card instructions. The Epson 
GQ-5000 laser can emulate the LQ-2500 
24-pin dmp, and it seemed reasonable to 
try the toolkit command <SDP_SET 
6,3,0,0> for selecting the printer type and 
resolution. The resolution for these set- 
tings is 180 dots/inch (maximum for the 
laser is 300) and 180 lines/inch. The im- 
provement in screen dumps was quite 
marked. The horizontal white lines we 
normally have to put up with in all-black 
areas are gone (see the illustration of a 
Perfection screen). Apart from using the 
LQ-emulation mode, the printer was set to 
print Landscape, to avoid the edges being 
chopped off the image. How applicable 
these setting are to other users’ printers is 
another matter. If you have a GQ-3500 or 
-5000, or an actual LQ-2500, or something 
that can — or might — emulate it, it’s worth 
a try. The dumps can take a long time 
though. The previous best settings for my 
9-pin dmp were <SDP_SET 1,3,0,0>, 
which are for the Epson MX80 ‘or similar’; 
the resolution for this is 120 dots/inch and 
72 lines/inch. 


SUB for hard disk 


The collection of utility routines for hard 
disk assembled under the heading of SUB 
by Phil Borman of Quanta is proving very 
useful with the Miracle hard disk. It would 
be no exaggeration to say they have trans- 
formed operations with the drive. Several 
programs can now be run, from their own 
sub-directories, using a further level of 
sub-directories for their data files. Switch- 
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ing between them involves no more than 
using CTRL-C — there is no need to re- 
acquaint each program with its default 
directories. Memory permitting, it is possi- 
ble to run text’) The Editor, Quill and 
Perfection together. With text®’ and Per- 
fection, there appeared at first to be no 
problem, since they can both be configured 
to accept device names which are long 
enough to allow for sub-directories. In their 
cases, the program directories used are 
WIN1_TXT87_ and WIN1_PERF_, and 
the data directories are WIN1_TXT87 
_DOCS_ and WIN1_PERF_DOCS._. The 
abbreviated names are used because sub- 
directory names are actually only file names 
and there can be some confusion between 
program files and sub-directories if the 
latter are called ‘TEXT87’ etc. 


Accomodating 


In practice, it was found that text®’ would 
accept its directory names, but proceeded 
to delete the characters between the last 
two underscores and then could not find its 
data files. The other two programs are less 
accommodating, perhaps because they 
were written before hard disk was much 
talked about on the QL scene. As long 
device names are unacceptable to the 
configuration routines of Quilf and The 
Editor, the default program devices were 
set as SUB7_ and SUBS5_ respectively, 
and the data devices as SUB8_ and 
SUB6._. In view of the slight problem expe- 
rienced withtext®’, it also was treated in the 
same way, the defaults being setto SUB3 __ 
and SUB4_. The SUB routine itself trans- 
lates SUB1_ to SUB8_ into specified sub- 
directory names. 

In this case: 


SUB1_ is equivalent to WIN1_PERF_ 
SUB2_ is equivalent to 
WIN1_PERF_DOCS_ 


| SUB3__ is equivalent to WIN1_TXT87_ 


SUB4_ is equivalent to 
WIN1_TXT87_DOCS_ 

SUB5_ is equivalent to WIN1_EDITOR_ 
SUB6_ is equivalent to 
WIN1_EDITOR_DOCS _ 

SUB7_ is equivalent to WIN1_QU_ 
SUB8_ is equivalent to 

WIN1_QU_ DOCS _ 


These equivalences could be produced by 
making the statements: 
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SUB_USE 1, ‘PERF_’ 
SUB_USE 2, ‘PERF_DOCS_’ 
SUB_USE 3, ‘TXT87_' 
SUB_USE 4, ‘TXT87_DOCS_’ 
SUB_USE 5, ‘EDITOR_’ 
SUB_USE 6, ‘EDITOR_DOCS ' 
SUB_USE 7, 'QU_’ 

SUB_USE 8, ‘QU_DOCS ’ 


but the SUB routine makes it unnecessary 
to issue these statements. The program 
file SUB_BIN can be configured to be 
aware of what SUB1_SUB8 representand, 
from there on, the user doesn’t have to 
bother about typing-in the sub-directory 
names for each program. This may sound 
complicated, but it is much preferable to 
not being able to use the hard disk as a 
proper sub-directory device. Trying to sort 
out which files belonged to which program 
when they were all dumped together in the 
Root Directory was a real pain. 

There are several useful commands and 
programs provided in the SUB collection, 
but it is available only to Quanta group 
members at present. Although I've not 
checked it yet, all the foregoing comments 
on SUB should apply equally to the high- 
density disks with the Gold Card as they 
have the same sub-directory structure. 

The following report comes indirectly from 
two other users, and is not something | 
have been able to check yet. It is said that, 
when a system has both the Gold Card 
and the Miracle hard disk connected, the 
file WIN _REXT must be deleted from the 
hard disk. Miracle advise only that the file 
is not necessary, but that advice would 
appear not to be strong enough, as there 
is a risk of all hard disk files becoming 
read-only if that particular file is present 
during boot-up. The file is incorporated 
into the Gold Card rom. 

There is an oddity in the instructions with 
the Gold Card, onthe second sheet, where 
the command <FORMAT “MIRACLE*H"> 
is given an explanation with some surplus 
words in it. It will actually format a disk to 
high density (1.44 MB), with the label 
“MIRACLE”. 


Hardware gaps 


Various Quanta members are active in 
trying to plug QL hardware gaps. The 
group itself is producing the Qimi mouse 
interface (as designed by QJump), and an 


IDE interface for hard disk is under devel- 
opment by one member. The Rebel hard 
disk units look as though they may reap- 
pear also. The interface part of the latter 
would be of particular interest to people 
who have, or can get hold of, cheap hard 
drives with the standard ST506 interface, 
because it should be possible to connect 
them directly to the Rebel interface. Some 
improvements have been made to the 
drive software recently; from accounts of 
users, the drive access speed with the 
Rebel unitis higher than that of the Miracle 
unit. The IDE interface should provide 
much better data-transfer rates than we 
have seen so far, but it does not support 
standard ST506 drives. There are a fair 
number of IDE drives available on the PC 
market at reasonable prices, though. 

With the Qimi mouse now seeming to 
have no serious competition, could it be- 
come the ‘standard’ for the QL? There 
must be a fair number of them around, 
from the previous sales activities of QJump, 
Care and Jochen Merz. One obvious prob- 
lem is that Turbo-compiled programs are 
apparently not compatible with Qimi. This 
would mean that Professional Publisher, 
for instance, could not utilise the Qimi 
mouse properly. This is perhaps the most 
important program in need of a standard 
mouse interface; it can be used with the 
Smiling Mouse, but there are not many of 
them around. It will also be important for 
Qimi and the Gold Card to be fully 
compatible; one would expect Qimi owners 
to be likely buyers of both the Gold Card 
and Professional Publisher. Miracle have 
recently made changes to the Gold Card 
rom to avoid possible trouble with Qimi 
interface. The borrowed GC | am using at 
the moment works alright in two of my QLs 
but notin the owner's QL with Qimi installed; 
there have been problems which appeared 
to be traceable to the Qimi installation 
previously, So some further experimenta- 
tion is called for, and a later rom may be 
fitted to the GC shortly also. 

It was encouraging to find that a particu- 
lar JS QL, which locks up within about 20 
minutes when a Trump Card is installed, 
doesn't seem to be having any trouble with 
the Gold Card, during all-day sessions. 
How touchy some of our machines are. . . 
It would suit me if the JS could be put back 
into use again (it went into a drawer once 
the Trump Card made it unusable), as the 
JM that has been used since then causes 
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quite some extra work during program- 
review sessions. There are a few features 
of the JM which don’t matter in normal use 
but which bring work to a halt fairly often 
when new programs are loaded after the 
system boot has been run. It may be that 
some of the stoppages are caused more 
by careless programming than by the Qdos 
version. One regular fault is for a pro- 
grammer to use a runtime Turbo toolkit 
without bothering to make sure the ver- 
sion of it that is supplied is compatible with 
the version of Turbo used during 
compilation of the program. 

The chances are that a program was 
developed on a JS (JSU if written in the 
USA), and never checked on a JM, and 
something that can be got away with on 
the former causes a halt on the latter. Try 
this boot for size — can you spot why it 
doesn't run on a JM with Trump Card but 
runs without murmur on a JS with Gold 
Card? 


WINDOW #0,480,23,15,229:BORDER 
#0,1,7:PRINT #0,">>> One moment...”: 
SDP_KEY 'p':SDP_DEV SER1:SDP_SET 
6,3,0,0: 
_base=RESPR(5632):LBYTES 
flpi_ RUNTIME_EXTS, base:CALL 
_ base: 

PAUSE 100:CLS #0:PRINT #0,”">>>Load- 
ing 3D_TERRAIN...": 

LINK_LOAD “PLOT","PARAMETERS’, 
"SHAPES","LIBRARY":END_CMD 


In the boot file, this is actually one end- 


less line of commands, with everything — 
apart from what is shown above as the 
second line —being in the original boot file. 
In the original form, the boot runs on both 
JS and JM, but the apparently-innocuous 
set of three commands to permit dumping 
of the screen cause the message ‘bad 
name’ to appear when the modified boot 
is run on a JM; on a JS, it still runs 
normally. Using the NEW command after 
the runtime extensions have been called, 
then typing-in the remaining commands, 
solves the problem. 


Suppliers’ letters 

Note the change, for this month only. As 
| haven't had my next batch of readers’ 
queries yet, but a bundle of letters has 
arrived direct from DP, it seems sensible 
to report a few comments from the other 
side of the fence. Summed up, what DP is 
saying is: ‘Why don't customers check 
what they did when they placed an order, 
before complaining about non-delivery of 
the goods?’ The mistakes made by cus- 
tomers when placing orders look easy to 
spot — afterwards — but we all have our 
blind spots when re-reading what we have 
written: 
1) Incorrect supplier address. In DP's case, 
the obvious mistake is putting “22" instead 
of “222" in the street address. 
2) Failing to put your own address on letter 
or envelope. 
3) Not giving a/fthe digits of a credit card 
number. 
4) Not specifying the size and format of 


disk a program should be supplied on. 
5) Calling and not leaving a message on 
the answerphone (then complaining that 
nobody called back!). 

It's worth noting here too that the QL 
World editorial office often receives 
enquiries, changes of address or even 
cheques from subscribers who don't quote 
their subscriber numbers, and which would 
in any case have been better sent directly 
to QLW's subscription agent (see the small 
print on page 3). 

If he has not written again, perhaps the 
customer who wrote to DP from Spain on 
9th July about a problem using a 24-pin 
printer with Professional Publisher would 
contact them again, and give his name 
and address this time. In regard to his 
printing problem, it may be caused by his 
new Epson printer not being compatible 
with his old Epson one; specifically, it may 
use increments of 1/180 inch instead of 1/ 
216 inch when up-spacing. The measure- 
ments of his two samples show the 1.2:1.0 
line spacing one would expect from this, 
although the actual characters are larger 
too. Don't expect all Epson printers to be 
‘Epson compatible’. My Epson laser printer 
has two emulation modes for other Epson | 
printers, as well as its ‘native’ mode, be- 
cause Epson chose not to make newer 
printers completely compatible with the 
old FX80. For instance, the LQ-2500 can 
print in 9- or 24-pin mode, and it may be 
compatible with the FX80 in 9-pin mode, 
but it certainly isn’t fully compatible in 24- 
pin mode. 


ARGRIVE YOUR @QlL 
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Now you can keep your Sinclair QL 
E magazines safe and clean. No 
more dog-eared covers or missing 
copies . . . You can protect 
magazines in this high qua 
specially-created binder. This Sinclair 
QL World binder will comfortably hold 
a complete year’s issues of your 
favourite Sinclair magazine. It is a high 


ie 
ity, 


quality product, British-made and 
comes with full binding instructions. It is 
manufactured in a rich, deep blue with 
genuine gold blocked lettering. 
Enhance your Sinclair QL World 
Magazine collection now for only 
£5.95 (inc.P&P!) Send for one today! 
The QL World binders als6 make an 
ideal gift for other Sinclair users too! 
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INFORMATION 

Program: Solitaire V 1.01 

Price: £15.95 (includes air 
mail charges, but 
check current price 
before ordering. Visa 
and Master Card ac 
cepted), 

: Sharp's, Box 326, 

Mechanicsville, 
Virginia 23111,USA, 
Tel: (USA) (804) 730 
9697. Fax: (USA) 
(804) 746 1978 


olifaire is a standard 

game for computers, 

but it doesn’t seem to 

have attracted as much 
attention on the OL as some 
other games, such as Othello. 
Maybe the problem of making 
acceptable images of playing 
cards puts programmers off. 
The writer of Solitaire has 
made a commendable job of 
the cards, and their ‘pips’. Lack 
of astandard QL mouse makes 
it necessary to write such 
games for keyboard use, or re- 
strict them to the very limited 
market of one type of mouse, 
or write different versions for 
several types of mouse. The 
latter two options make no 
sense for a supplier with a 
small market, so this version 
is played from the keys. It is 
compiled with QLiberator and 


FIWARE FILE 


SOLITAIRE 


Bryan Davies takes some time to 
be alone with his computer. 


there are no serious delays in 
operation. 

Instructions are in a 
Quill_DOC file, and are quite 
straightforward, taking up a 
little more than one page. The 
boot file serves only to put up 
the initialscreen,and EXEC W 
the program file. You can alter 
this to EXEC and multi-task 
the program, but there is only 
one point at which a cursor is 
displayed, so you need to be 
there when switching to other 
programs. The first actual pro- 
gram screen is a list of high 
scorers, to give you something 
to aim at. The lowest score on 
there is 150, the highest 1550 — 
quite a range. There are two 
levels of play, with the lower 
one being the easiest and scor- 
ing only half the points of the 
higher one. My first attempt 
netted 650, with the half-points 
level, so neither disgrace nora 
prize looked likely. 

Once the game gets going you 


Foundations 
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are aware of one of the OL’s 
big weaknesses, namely the 
lack of colours in high-resolu- 
tion mode; text is displayed in 
white on a green background, 
whichis nota very visible com- 
bination on my Cub screen. 
Apart from this, the cards and 


but this one interested me 
enough to want to play itagain 
and again. Maybe it is a fune- 
tion of simplicity, or some Lud- 
dite streak in me, Whatever 
the reason, Solitaire kept me at 
it for several dozen tries, after 
which my score had finally 
exceeded the highest on the 
default list by a sufficient 
margin for me to retire grace- 
fully. It reminded me a bit of 
the ‘battleships’ game tested 


GattShee Seftware 


OL 
SOLITAIRE 


whet 


The elaessitc copd game 


Compiled utth 


their markings are well done, 
and the overall layout is clear. 
Ten keys are used to signal the 
moves you wish to make. You 
press a key to identify one of 
the seven columns into which 
the cardsare initially dealt, one 
to move a card to the ‘founda- 
tions’ (the four piles onto 
which the suits are assembled 
by you), one to move a card 
from the deck (the remainder 
ofthe cards, notin thecolumns 
or foundations) and one toturn 
cards from the deck three at a 
time (only one at a time for 
Level 1). The program appears 
to trap ‘illegal’ moves (but no 
attempt was made totry all the 
possibilities for this). 

Games tend to leave me to- 
tally cold, especially if they 
concentrate on eating or ac- 
quiring treasure of some form, 


Po Liberater 


some while ago, which 
seemed to retain interest by 
virtue of its sheer simplicity, 
and some good touches on the 
display. 

A very minor fault is that 
when y is selected in answer to 
the question ‘Another game?’, 
the y sometimes turns up as 
the choice for the next option, 
‘Please select level 1 or 2’. Since 
the y is ignored if you key in 1 
or 2 and press ENTER, no dis- 
ruption to the flow of the 
games need occur. 

This is a good little game to 
have around for some light re- 
lief from serious computing. 
Reasonably-priced, it’s easy to 
learn and play. You are un- 
likely to make the maximum 
score, so there’s always a tar- 
get to aim for. Not too taxing 
for us simple folk! 


Jurgen Falkenburg (Computer 
Technik) has produced a new 
expansion board for the QL. 
Falkenburg reports that the QL- 
ROM-Card ‘allows for the first 
time access to the complete OL 
memory range for several ap- 
plications’. He recommends it 
for both unexpanded QLs and 
models with current ram ex- 
pansion and disk drives. It can 
be used to expand rom or ram 
memory. With the additional 
power-protected MOS-RAM- 
Disk, it supports the installa- 
tion of a reset and power- 
failsafe, write-protectable 
RAM_Disk (mos1_ to mos8_), 
with up to 256 KB for the QL 
withtwo ROM-Cards installed. 
Selection between different 
applications is done with an 


address range selector and 
other features of the expansion 
board. 

Four memory banks are 
available on the board, each 
with a type-selector to choose 
between the sram and eprom 
available. 

The board’s integral battery 
backup and write protection 
switch all the use of static rams 
to replace eproms, so that an 
external eprom programmer is 
not necessary. The buffered 
rams are designed to hold their 
contents for more than six 
months before the batteries 
have to be recharged. 

With the addition of the MOS- 
disk driver available, the MOS- 
Ram-Diskcan be installed, This 
is recommended by Falkenburg, 


MORE ON QIMI 


Quanta has contacted OL 
World with further informa- 
tion about the Qimi mouse and 
interface (QL Scene, September 
1991). Manufacture of the Qimi 
interface board in the UK has 
been commissioned by Quanta, 
who are therefore able to offer 
the board (to Quanta members 
only) free of commercial over- 
heads at the considerably re- 
duced price of £25 plus £2 post 
and packing. 

Bill Richardson of EEC has 
told Quanta that he will no 
longer be selling the imported 
interface board, but still has a 


which we apologise. 


stock of Oimi Mice available 
forsale. The UK-manufactured 
board will be available to non- 
members from Data Systems 
for £35 plus £4 post and pack- 
ing. 

Says Quanta Chairman Phil 
Borman: ‘Some of our mem- 
bers misunderstood the report 
and assumed that Quanta must 
be buying its boards from 
Jochen Merz. This is not the 
case.’ 

Data Systems man Chris 
Gregory can be contacted on 
0272 513653 during social 
hours. 


Two printing errors appeared in DIY Toolkit in last month, for 


The listing one on page 38, one line is missing from the bottom of 
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Expansion board from Falkenburg 


as ‘ideal for users working only 
with microdrives’. Frequent 
use programs can be copied to 
the ramdisk and can then be 
started from the MOS-Disk. 
Rommable software like Quill 
can be run directly from the 
MOS-Disk memory, leaving 
ram space free for data. ; 

More than one ROM-Card 
may be used simultaneously, 
depending on the number of 
other peripherals in use with 
the QL. The free selection al- 
lowed from each memory 
socket allows a variety of com- 
binations which are explained 
in the user manual. Basically, 
the different memory types 
may be expanded with a QL- 
ROM-Card depending on base 
address selected and the type 


The Spanish QL users’ club in 
Madrid is now named QLiper, 
and publishes a 3.5 inch disk- 
based magazine bi-monthly. 
QLiper welcomes any owner 


All Formats 
dates 


Dates booked for the All For- 
mats Computer Fair for the re- 
mainder of the year are: Lon- 
don Horticultural Halls, West- 
minster, November 3; Mid- 
lands, National Motorcycle 
Museum, opposite the NEC, 
November 10; Scotland, City 
Hall, Candleriggs, Glasgow, 


the listing. This should read: 
bne.s check chan 


out of memory. . .’ 


Changes 


The seventh paragraph in the first column of page 39 should 
read: ‘The Turbo-Toolkit variant has the most comprehensive 
checks. Listing two detects most errors, but may stop if you run 


and size of memory installed. 
The QL may be expanded to 
1008K of memory with a 
maximum of 368 K rom, 896 K 
ram and 256 K MOS-Disk. 

The QL-ROM-Card cannot be 
used alongside the TrumpCard 
with 738 K ram, or the Gold 
Card. 

The export price of the QL- 
ROM-Card is DM 157 (£52) or 
DM 210 (£70) including the 
MOS-Disk driver and static 
rams. 


The fact sheet from which this 
information is drawn is avail- 
able from Jurgen Falkenburg, 
Thanweg 36, D-7359 Ersingen, 
Germany. 


§ Da n 
of a computer running a Odos 
compatible operating system. 


Contact Marcos Cruz, Acacias 
44, 28023 Madrid, Spain. 


December 1; London Horticul- 
tural Halls, Westminster, De- 
cember 14; Leeds, University 
Sports Centre, December 15. 
The organisers write: “Tip: 
Come after lunch, when there 
are no queues, stallholders are 
more accessible and prices are 
often even cheaper.’ 


Advance tickets and infor- 
mation from John Riding, tel: 
0225 868100. 
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PEN QHANNEL 


somebody with the answer, or just sound off 


Open Channel is where you have the 
opportunity to voice your opinions in 
Sinclair QL World. Whether you want to ask 
for help with a technical problem, provide 


about something which bothers you, write 
to: Open Channel, Sinclair OL World, 
116/120 Goswell Road, London EC1V 7QD. 


I was recently shown a copy of 
Sinclair QL World by a friend of 
my daughter. He owns a OL 
(several, in fact) and is currently 
working on a very high 
resolution graphics board for 
the OL with a lot of success. 
The copy in question was the 
May 1990 issue, and contained 
a Printer Report in which three 
contributors described their 
experiences when linking three 
different printers to the QL. 
One of your contributors, 
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John de Rivaz, tells of his ef- 
forts to link a NEC P2200 to his 
QL and to his Exidy Sorcerer, 
and of his need for some kind 
of reset feature. 

I do not own a QL but I do 
owna Sorcerer (several, in fact) 
and have had similar problems 
linking it toan Epson MX80F/ 
T. 

Concerning his reset problem, 
I have fitted a neat looking 
pushbutton (single pole) to 
both my Epson and my Star. 
This pulls the INIT signal line 
(active low) at Centronicsinput 
pin no. 31 down to 0V ground 


when | wantto clear the printer 
buffer of rubbish. This method 
does not cause the Sorcerer to 
crash as switching off the 
printer does. 

I find his remarks about the 
Sorcerer and his word 
processor very interesting 
because I too had similar 
problems. The word processor 
program | use is one originally 
produced by Exidy and Testan 
Scientific together and 
supplied to Sorcerer users in a 
Rompac. I have a similar 
program on tape and on disk 
which I have modified to 
enable the wordprocessor 
program to control an Epson 
printer via codes embedded in 
the text. If his word processing 
program is similar to mine in 
having the outputto the printer 
fed via a vector address, then 
he could insert this patch into 
the output chain quite easily 
by changing the vector address 
to point to the patch. 

The patch I have is in Z80 
code (a cpu that Sinclair long 
ago abandoned!) but the 
algorithm could be used on the 
QL so if anyone is interested I 
will reply to any comments or 
queries I get. 

I am particularly curious 
about the set-up that Mr de 
Rivaz has with his Sorcerer and 
wordprocessor and would be 
grateful if you could put me in 
touch. 

Jack Swain 
Hitchin 
Herts 


Digital Precision Ltd. only 
praises when praise is due; 
consequently we don't praise 


| other people's products very 


often! However... 

Gold Card is fantastic, terrific 
and superb, and is both 
strongly recommended and 


endorsed by Digital Precision 
Ltd. It is excellently designed 
and engineered. It is quite a bit 
faster than its manufacturers 
claim (about eight times faster 
thana'standard' OL and about 
five times faster than the most 
common Trumpcard), Itis very 
reliable, and, perhaps mostim- 
portantly, itis very compatible 
— compatibility with most 
programs (and all of ours, as 
far as we know) is perfect. 

Miracle Systems are to be con- 
gratulated for Gold Card and 
castigated for the over- 
modesty of their advertisement 
for it: Gold Card is far better 
than they make out! 

Many Perfection users have 
told us they think Perfection is 
the QL product of the year. 
Digital Precision disagrees - 
pride of place goes to Miracle 
for Gold Card (with Perfection 
aclose second). Bravo, Miracle! 
Long live the QL. 

Freddy Vachha 
Managing Director 
Digital Precision Ltd 


Ibought my first QL in January 
1987 after reading a review in 
that month's edition of QL 
World of anew word processor 
by Digital Precision called The 
Editor. The description 
indicated that the program was 
efficient, fast and very flexible. 
So it proved to be, with further 
extensions in scope as it was 
developed into The Editor 
Special Edition. 

Over a period of time, one 
becomes attached to a word 
processor as proficiency and 
familiarty increases. To 
contemplate change involves 
quite a wrench, butin May 1991 
I again read in QL World a 
glowing report of a new word 
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processor by Digital Precision, 
this time called Perfection. 
Clearly much had happened in 
the period between the two 
programs, and I decided to 
purchase it. 

The program has a precision 
feel to its operation, continues 
the tradition of flexibility and 
is very fast. It seems designed 
to give equal satisfaction to 
occasional users who can 
mainly implement commands 
via the menusand regular users 
who have the opportunity to 
use the faster commands. 

I have no connection with 
Digital Precision and its design 
team, but I offer them my 
congratulations on a major 
development for the QL. 

R E Copland 
Ryhope 
Sunderland SR2 0OHT 


I am an ex-QL user (largely) 
but would like to suggest to 
QL owners and Amstrad that 
Amstrad make a cheap CE-1 
computer that could run 
Mackintosh software and be 
QL-compatible. 

Such a machine with a 68020 
or 30 processor could be up- 
graded to 68040 in future for 
real QL power. 

By the way, I have some QL 
software and blank cartridges. 
If any OL owners in Australia 
would like a list of titles, please 
write to me. 

Wayne Mocrellini 
PO Box 309 
Gordonvale Q 4865 
Australia 


For years I've borne, with 
irritation, the fact that Quill and 
my printer have never reliably 
kept continuous pages in 
register. Now I have finally got 
the solution. First, the preamble 
in the printer data has to be 
extended using Install _bas to 
cancel the automatic 
perforation skip of the printer. 
Onmy Epson-style printer this 
is done by adding 27.79 (ESC, 
capital 0). Second, the lines per 
page in the printer data has to 
be changed to 70 for A4 paper 
(presumably 72 for 12 inch 
paper). Thirdly, using 'Design' 
on the Quill document, the 


upper and lower margins are 
set to zero and the lines per 
page to 61. The 70 is essential, 
since it fixes the pitch of the 
page. The upper margin is set 
by where you set the page in 
the printer before starting. The 
lower margin is set by the 61, 
since this number fixes how 
much of the page is printed, 
counting from the first printed 
line to the 'page n' which Quill 
prints three lines below the last 
line of text on the page. The 
number of lines actually 
printed per page is therefore 
58. Choice of 61 gives a four- 
line clear margin at the foot of 
the page. This means that this 
number can be set to anything 
up to a maximum of 65. 

None of the above informa- 
tion is obtainable from the 
original documentation, which 
specifically states that the 
default settings of both Design’ 
and the printer data are for A4 
paper. The 'page n' mentioned 
above, and the spacing between 
it and the text, is a default 
setting of the ‘footer’, a fact 
which also is not stated in the 
manual, and which it might 
take the casual baffled user, 
who never has use for a footer, 
a year to find out. The setting 
can be changed using the 
‘footer’ instruction. 

Walter Stanners 
Over 
Cambridge 


Inthe May edition of QL World, 
Beryl Crawley described a 
problem with Quill which had 
the effect of underlining all her 
screen output. I also had a 
similar problem, but it 
disappeared some time ago 
and lam notsure why. Isuspect 
it might have to do with the OL 
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overheating, in which case I 


recommend Care Electronics’ 
QPower Regulator, which I 
found simple to fit (Iam not an 
engineer). The only other 
‘modification’ [have carried out 
on the QL is to buy a mains 
interference suppressor, 
available from most electrical 
shops. 
GW] Daniel 
Heath 
Cardiff 


QL users are. staunch 
supporters of Qdos and 
SuperBasic. The operating 
system is without doubt an 
excellent one, but though 
SuperBasic is powerful there 
remain possible enhancements 
which can be found in other 
Basics. There are times when I 
look enviously at the Basic of 
Acorn computers, which have 
such things as VAL and OLD, 
or for that matter CHAIN, 
which allows one Basic 
program to call another and 
pass parameters to it. 

I also like some of the Basic 
constructs of the SBASAG 
extension to Research 
Machines’ RMBasic, written for 
the RM480Z machine by 
Software Production Asso- 
ciates. Itis not difficult to utilise 
SuperBasic keywords to 
emulate all of these, indeed, 
LOOP. .. ENDLOOP/REPeat. 
. . END REPeat and CASE. . 
-ENDCASE/SELect. .. ON. . . 
END SELect are equivalents, 
but the availablility of the 
WHILE... DO... ENDWHILE 
and IF... THEN... ELIF... 
ELSE. . . ENDIF constructs 
would be an enhancement to 
SuperB as both would improve 
the readability of programs by 
avoiding the need for 
additional nested conditional 
IF... END IF or SELect... END 
SELect constructs. 


extras also? 


I particularly like ELIF, which 
would read better in its 
unabbreviated form of ELSEIF 
or ELseLF. For those unfamil- 
iar withSBASAG, thespecimen 
here shows the use of the 
SBASAG keyword ELIF. 

Much neater, don't youagree? 
Perhaps some enterprising 
reader could, in the interests of 
portablility of software and of 
general flexibility, write some 
SuperBasic extensions to 
emulate these to save the chore 
of amending such software. For 
the RM480Z machine, 
SuperBasic's EDIT, CLS with 
parameter and WINDOW 
would also be welcome USR 
additions. 

Other readers may know of 
other desirable extensions to 
SuperBasic that exist on other 
Basics. Simon Goodwin 
occasionally requests 
suggestions for toolkit exten- 
sions. I wonder if he, or any 
other contributor, would con- 
sider writing some articles 
showing alternative ways in 
which the construction that 
exist in other Basics could be 
emulated on the QL using 
existing keywords, and also 
write some machine code 
extensions for the more useful 
ones. 

Perhaps you would consider 
commissioning a series in the 
format of the old monthly 
Keyword page. This would 
serve the purpose of enhancing 
our own Basic and making it 
easier to port Basic programs 
written on other computers 
over for use on the QL. I recall 
that this was the justification 
for having some of the interior 
Basic constructions such as the 
FOR. . . NEXT loops, GOTO 
and GOSUB in the QLrom. We 
still have these, but wouldn't it 
be even better to have their 


Ron Allpress 
Thwaite 
Suffolk 
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Information 4 


AN FIWARE FILE 


INFORMATION 


Program: Vision Mixer Plus. 
Needs min. 256K ram, and 
monitor display. 


Supplier: Dilwyn Jones Com- 
puting, 41 Bro Emrys, Tal-y- 
Bont, Bangor, Gwynedd, LL57 
SY'T. 


Price: £22.50, 3'/2 or 5!/ain 
disks only. 


istion Mixer Plus is a 
natural improvement 
on the video effects 
program Vision Mixer 
by Dilwyn Jones, which I re- 
viewed in QL World, January 
1991. The enhancements now 
include 50 wipe effects (many 
new), the number of screens is 
no longer limited by the avail- 
able ram, mode 4 and mode 8 
can be mixed and a few other 


VISION MIXER PLUS 


small benefits. The main appli- 
cations, as before, are seen to 
be in lecturing, business pres- 
entations, advertising and 
entertainment. Indeed they 
have been used very success- 
fully at Quanta workshops, 
notably in Portishead. 

The program comes with an 
easy-to-follow 16-page manual 
which contains all the infor- 
mation needed. A special sec- 
tion is added to show how the 
user can run from a hard disk 
setup. 

This upgraded program al- 
lows the construction of more 
screens and sequences than 
was possible with Vision Mixer 
and requires only 128K of 
memory expansion. This is 
because Vision Mixer Plus does 
not require the whole sequence 
of screens to be pre-loaded into 
the computer's memory, Only 
one screen at a time is loaded 
just before it is due to be dis- 
played. Two key characteris- 
tics follow directly from this: 


Firstly, the maximum number 
of screens which can be placed 
in a display sequence is not a 
function of the size of memory, 
but of disk drive capacity — 44 
screens foratwin3'/2inchdrive 
using 1440 sector disks, 88 for 
four such drives (22 per disk), 
many more for a hard disk. 

Secondly, the medium on 
which the screen images are 
stored must be available for 
constant access when the dis- 
play sequence is running. 
Floppy disks holding the screen 
images must remain in one or 
more of drives flp1_, flp2_, 
flp3_,flp4_(orthescreens must 
be stored in Ram2_). A hard 
disk directory Win2_ holding 
such screens must be similarly 
accessible. 

The peak memory required 
by the suite is about 100K, 
leaving a similar amount free 
even with only 128K of memory 
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fe John Shaw mixes it... 


expansion. The main program 
MENU shows the freememory, 
updated each time the MENU 
is displayed. The program now 
permits very long sequences of 
screen images to be presented 
with, or without human inter- 
vention. 

It includes a selection of ef- 
fects for use in the transition 
from one screen to the next 
(wipes). In the random WIPE 
and random colour mode, the 
program not only offers many 
hundreds of different inter- 
screen effects, but it also pro- 
vides for the WIPE colour to be 
fixed and/or specific WIPEs to 
introduce specific screens. 

Users with larger memory 
expansions have the option of 
copying some, or all of the 
screens of a sequence onto a 
ram disk (RAM2_) before run- 
ning the program (subject to 
available free memory). This 


facility can be used to supple- 
ment disk storage capacity, or 
to prevent excessive drive 
wear when running the 
program for long periods ona 
regular basis. A program, 
RAMLOAD EXE is included 
on the disk to help facilitate 
this. 

The time interval for the dis- 
play of each screen is at the 
user's choice and can be very 
easily changed, as can be the 
choice of screens ina sequence, 
the order of their presentation, 
the allocation of WIPEs to par- 
ticular screens and the WIPE 
colour. 

Examples of some of the 110 
wipes which are now included 
on the disk are: 


1 Venetian Blind Down 

2 Venetian Blind Up etc. 

3 Diagonally Split Blockout 

4 Venetian Blind in Halves 
Down& Up 

5 Blockout in Halves Down & 


Up 
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6 Multi-split Venetian Blind Up 
& Down 
7 As Wipe 6, but solid blockout 
8 Two-colour Venetian Blind 
Down & Up 
9 Vertical Venetian Blind 
10 Wipe 1 Plus Wipe 9 - two 
colours 
11 Wavy Front Blockout 
12 Two wide "snake" Blockout 
with gaps 
13 Multiple Blocks with hori- 
zontal gaps 
14 Multiple Blocks with verti- 
cal gaps 

| 15 Wipe 14 plus Wipe 13 
16 Wipe 8 plus Wipe 15 
17 Vertical Venetian Blind — 
wide gaps 
18 Wipe 9 plus Wipe 17 
19 Four narrow “snake” 
Blockout with gaps 
20 Two-colour Concentric 
Circle Blockout 


All of these screen sequences, 
and indeed the other ninety, 
canbeSAVEDand re-LOADed 
automatically for immediate 
use on another occasion. 

Users of the original Vision 
Mixer will have to change their 
methods when using Vision 
Mixer Plus, The much higher 
overall speed and screen se- 
quence capacity of the latter 
coupled to its much smaller 
memory consumption and ease 
of making changes should al- 
low theimagination to run riot. 


Screen 


The Vision Mixer screen im- 
ages fill the whole screen, as do 
the wipes. In Vision Mixer Plus 
the bottom window (channel 
#0} is used to show the message, 
or screen title, forming an in- 
herent part of the saved Screen 
and isnot affected by the wipes. 
This deliberate difference 
stems from the need to havea 
set space and format for de- 
scriptive text when it is used 
for lectures, oradvertisements. 

So here we have the natural 
progression to Vision Mixer, a 
Rolls-Royce program with the 
versatility and scope needed 
to give a much more profes- 
sional presentation. 

A companion program, 
Picturemaster, by Joe Haftke, 
also available from Dilwyn 
Jones Computing, allows for 
the generation of many more 
new screen images, creating 
captions, shadowed lettering 
and drawings, and producing 
some intriguing screen ma- 
nipulation effects. 


INFORMATION 
Program: Picturemaster. 


Supplier: Dilwyn Jones Com- 
puting, 41 Bro Emrys, 
Tal-y-Bont, Bangor,Gwynedd, 
LLS7'3YT. 


Minimum 256K ram required. 
Monitor display preferable. 
3'/2 or 5'/sin disks. 


Price: £15.00 


creenmaster isacompre- 

hensive utility 

designed to make 

screens for use with 
Vision Master or Vision Master 
Plus. These screen images can 
be ‘pictures’, or text, or a com- 
bination of the two. 

Text can be produced in a 
variety of styles, and visuals 
can be generated using lines, 
rectangles, circles and ellipses. 
The figures can be moved, ro- 
tate and have their size varied 
without any limitations and in 
any QL colour in mode4 and 
modes. 


Menu 


Included are 30 ready-made 
procedures for making differ- 
ent screens by a simple choice 
from amenu. Most employ the 
use of random numbers, re- 
sulting in a much larger 


PICTURE 


MASTER 


... and gets into the picture. 


selection of screens than the 30 
basic designs would suggest. 
They are as follows: 


1, Star 2. Tapes 3. In_sets 4. 
Twirl 5, Flying Sign 6. Logo 7. 
Spirals 8. Flowers 9. Fans 10. 
Vortex 11. Icons 12. Colours 4 
13. Colours 8 14. Kite 15. 
Pumpkin 16. Clover 17. Col- 
lage 18. Dart 19. Ant 20. Tent 
21. Cones 22, Off_sets 23. 
Kaleido 24. Fish 25. Printsize_4 
26. Printsize_8 27. Bookmark 
28. Desert 29. Ellipses 30. Ob- 
jects. 


These and others can be 
dumped to a suitable printer, 
with the aid of the user’s own 
copy of “gprint_prt” (a part of 
Psion Easel). The most impor- 
tant feature of the program is 
that it is deliberately made 
available in SuperBasic so that 
users can modify it. 

You can generate a large 


number of pre-programmed, 
attractive screen pictures or 
adapt your own screens to the 
Vision Mixer Plus format with 
text captions or make text 
screens in a variety of colours, 
size and style combinations, 
very simply and fast. 

Similarly, you can generate a 
variety of geometric figures 
and patters and create/en- 
hance screen images, using any 
combination of the above. 

If you prefer, you can QUIT 
the program and use its many 
PROCedures as direct com- 
mands. Used in this mode, the 
program still offers all the ca- 
pabilities of the formal options, 
but allows the user the free- 
dom to modify parts of the 
program, experiment and 
improvise. 

The program is supplied with 
a comprehensive manual 
which is well laid out and easy 
to follow. 
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WINBACK 
AND 
VISION 
MIXER 
UPGRADES 


Dilwyn Jones Computing has 
upgraded its hard disk backup 
utility, Winback, as a result of 
the review in QL World Sep- 
tember 1991. Some minor (and 
| obscure) bugs have been fixed, 
and the problem associated 
with large files such as the 
MSDOS partition has been 
sorted out — the user now has 
the option of missing out this 
file and proceeding with the 
remainder of the backup. An 
upgrade to the program, which 
is now at version 1.10, can be 
obtained by sending the 
Winback master disk to DJC. 
The upgrade is free, but please 
include return postage. 

The Vision Mixer Plus pro- 
gram has also been upgraded 
to make it compatible with the 
Miracle Systems Gold Card in- 
terface. Upgrades for this pro- 
gram are also available free of 
charge when the master disk is 
sent with return postage en- 
closed. The fix is required be- 
cause the program previously 
crashed if the amount of free 
memory available was greater 
than 999,999 bytes (ie more than 
six digits long) and users had 
to resort to cutting the amount 
of free memory available with 
the RES SIZE command on the 
Gold Card toolkit. 

Further information and re- 
turned masters to Dilwyn 
Jones Computing, 41 Bro 
Emrys, Tal-y-Bont, Bangor, 
Gwynedd LL57 3YT, UK. Tel: 
0248 354023. 
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‘Universa 


Following the demise of MGT, 
EEC Ltd purchased the entire 
stock of ‘lifetime’ disk drives, 
for which they found a ready 
market, and they are now pro- 
ducing a IMB and 2MB re- 
placement to be known as the 
‘Universal’ disk drive. 

The drive, with the appro- 
priate lead, is compatible with 
the BBC range of micro com- 
puters, the Archimedes, QL, 
Spectrum, CPC, Atari ST and 
the Amiga, as well as the PC 
XT and AT, and most PC 
compatibles including the 
Amstrad 1512 and 1640. It can 
be used with the Spectrum, 
using a Datel Plus D disk and 
printer interface, and with the 
QL using one of the Miracle 
expansion units, also available 
from EEC. The Universal drive 
isina neat grey metal case with 
mains switch, lead and 13 amp 
plug. Selection for different 
computers is done by external 
dip switches, and the unit is 
supplied with a dust cover and 
comprehensive instruction and 


installation manual covering 
the listed micros. 

The basic unit has an 
Amphenol-type socket on the 
back, similar to a Centronics 
printer socket, and leads are 
provided for the various op- 
tions. 

The price of The Universal 
disk drive is £75.00 inclusive of 
VAT and any one lead. Leads 
for the other micros are also 
available ex stock for £9.95. Ifa 


SQLUG celebrate 


It seems like only yesterday 
when Scottish QL Users Group 
SQLUG were celebrating their 
first year together. Actually, it 
was last September. Being as it 
has lately been this September 
~SQLUG are celebrating their 
second year together. To mark 
the event, alongside their 
monthly four-page SQLUG 
Newsletter, they have pro- 
duced a Second Anniversary 
Special Edition Newsletter, with 
16 pages (A5), an encouraging 
report of the year’s activities, 
and two useful articles, a gen- 
eral one on upgrading QL sys- 
tems, and another on repairing 
damaged disk sectors. 

“We are keen to recruit new 
members, so we would be 


grateful if you could mention 
our continued support for QL 
users,” writes Secretary Alan 
Pemberton. “For the £6 annual 
subscription, we offer help and 
advice at meetings or over the 
phone, aregular newsletter and 
access to our large public do- 
main library (bigger even than 
Quanta’s!) In fact, given all our 
benefits, I'm surprised we 
haven’t attracted more QL us- 
ers.” 


No sooner said than done, 
and many happy returns of the 
Special Edition. Contact 
SQLUG through Alan at 65 
Lingerwood Road, 
Newtongrange, Midlothian 
EH22 400. 


double drive is required, two 
units can be supplied for stack- 
ing side by side or on top of one 
another with a special lead for 
a total of £135.00 inclusive of 
VAT. Carriage in each case is 
£9.00, with delivery ex stock 
while stocks are available. 

For further information con- 
tact EEC Ltd. 18-21 Misbourne 
House, Chiltern Hill, Chalfont 
St. Peter, Bucks SL9 9UE. Tel. 
0753 888866. 


Quantem 


g0 
International 


Quanta’s East Midlands sub- 
group, Quantem, have an- 
nounced that their two-day 
workshop on the 12th and 13th 
October will be the first Inter- 
national QL Meeting in the UK. 
The meeting is being held at 
the Sherwood Community 
Centre in Nottingham, which 
was also the venue for the 
Quanta AGM. The venue was 
chosen for its central position 
in the UK and with regard to 
ports from Europe. 
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he fact that the QL has not been 

produced since 1985 only reduced 

the strength of the QL scene alittle 

instead of killing it. This is for two 
main reasons: first, because the QL and its 
Qdos are very powerful and friendly; sec- 
ond, because QL users and suppliers made 
a great effort to support the QL. Person- 
ally, | think that its long life is due to the 
genius of Sir Clive Sinclair, Tony Tebby 
and a few other brilliant people: thank 
goodness for having them. 


Development 


Reading specialized magazines we can 
find people who continue to develop hard- 
ware, peripherals and software for QL, 
and a number of them seem to be very 
good. 

l only recently got a Quanta membership 
and a QL World subscription, but | have 
been reading about Sinclair micros for a 
long time. | have been a Spectrum user 
since 1982 and | have a very good system 
with eight networked Spectrums and all 
sort of peripherals. What always catches 
my eye in the magazines are the differ- 
ences between European and American 
users’ desires, both for the QL and the 
Spectrum. 

On the subject of software most British 
users prefer word processors and spell 
checkers, desk-top publishing, tax ac- 
counts programs, and so on. American 
ones prefer to develop graphics systems, 
cad and drafting programs, and robotics. 

On the other hand, Europeans early on 
developed interfaces for printers, joysticks 
and midi. Due to their software prefer- 
ences Americans buy mice, massive 
memory cards, |/O and A/D interfaces. 


Differences 


| remember that in the earlier age of the 
Sinclair ZX80 and ZX81, one could al- 
ready find in drugstores I/O interfaces to 
drive robotic models, speech synthesisers 
and speech recognition units. They also 
had disk drives for the ZX81! 
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Poreonal Opinion 


In the first of an occasional column, Eduardo Fairbanks, a long-time user and recent 
subscriber to QL World, puts forward his hope for the QL in the futiure. 


Turning back to the aim of this text, | 
disagree with some people who have writ- 
ten that there are few things more to do on 
QL developments, now that it already has 
all a user could want. | recently read about 
some upgrades for QL users: in Italy Mr 
Innocenti has developed QL graphics so 
that he can put up to 32 real colours in 
mode 4. Mr Delsanti wrote a routine to 
animate screens and gave it the significant 
name of QLFilm. | know that some people 
are now working on hidden line and shad- 
ing routines for cad packages. We have 
cad packages for IBM PCs. 

Still in Italy there is Mr. Del Bello's 
say_italian routine running into a speech 
synthesiser, and Mr Santachiara’s music 
manager. | recently heard about the new 
video digitizer on the market, from CL 
systems. Some other articles tell about 
expansion boards, real time clocks, robot 
control and so forth. 


Increasing 


As wecan see, the list of new QL features 
is increasing much faster than one could 
think for a micro which hasn’t been 
produced for along time. We can also see 
that the differences between British and 
overseas users | pointed out in the begin- 
ning is decreasing. 

The generality and the versatility we are 
now going towards necessitate the devel- 
opment of motherboards to multiply the 
expansion port and the eprom connector, 
as well as the improvement of the internal 
voltage regulator and heat sink in order to 
attach more interfaces. By the way, | al- 
ready had that problem with my Spectrum 
system; today my eight Spectrums are 
powered by four IBM switched power sup- 
plies (with fans) giving them the right volt- 
age and current direct to their pcbs, so | 
took out their heat sinks and voltage regu- 
lators, and they run at room temperature. 

It is not a good thing to be powering the 
computer on and off to change peripherals 
every time you change jobs. It would be 
wonderful to have them all connected at 
once. Best would be an expansion board 
capable of switching each one or several 


on or off at our wishes without the need to 
unplug them. A chip switch should be 
provided to avoid system crashes when 
powering the peripherals on and off. The 
chip switch should be triggered both me- 
chanically and from the software. 


The dream 


For myself | would connect the Trump 
card, trackerball, scanner, dot matrix 
printer, plotter, speech synth, modem, 
eprom programmer and whatever else is 
forthcoming. At that level of the dream, 
one could also design several switchable 
eprom ports! 

Of course, this‘QL would have a lot of 
memory, like the old ABC Elektronic’s 4 
megabyte ram card, or even more. We 
know that the 68008 can address up to 16 
MB of memory, and the Japanese chips 
are growing faster in capacity while falling 
down in price. So | think that very soon we 
could have a 16 MB ram board. An exam- 
ple of what | say is (once more) my 
Spectrums: | had one of them upgraded by 
VideoVault from 48 K to 128 K (people 
always said that could not be. done, but it 
was) and | also have another Spectrum 
with a co-processor (4 MHz) and 512 KB 
dram! As we can see, things go on and on 
and almost anything is possible with elec- 
tronics and creativity. 


Another leap 


| have been reading some articles about 
how we could upgrade the QL to perform 
another leap on it. Some people wish to 
have more memory, others more speed, 
others want to have more graphics resolu- 
tion on screen, like the Atari and Amigado. 
| really don’t know how to improve the 
screen resolution, but a good look into the 
Macintosh circuitry would give a good idea. 
The speed is easy; we know that the 
68008 runs by four steps of eight bits to 
perform its 32 nominal bits due to the 
economy of eight tracks instead of 32. 
Nowadays the price of apcb containing 32 
or 8 tracks is the same. One could also use 


the 68030 or even the 68040, much faster 
than ours. 


Do something! 


Some people write articles upon this 
subject and call their project one name or 
another. Names apart, all of them want to 
upgrade their systems to the Quantam 
Leap Mark Il because they love the QL and 
Qdos, and are not happy working with 
Atari, Amiga and IBM sets. When they 
have todo this, they use on these machines 
a QL emulator. Those people really want 
todo something in the near future, and I'm 
of a like mind. 

Nevertheless some other people advise 
against this type of project on two counts: 
firstly, Amstrad's rights over Sinclair and 
the Quantam Leap; secondly, cost. 

Well, the QL Mark || would have a rom 
like Minerva and an enhanced Qdos. Some 
people have written (and they are right) 
that the project would cost a lot in plan- 
ning, design, production and marketing. 
They say that if established people and 
corporations in the market don't have in- 
terest in producing it, how can a group of 

| users do it from the bottom? 

Well, have some ideas on how: great 


corporations and users have not exactly 
the same targets; they have profits to care 
for (that is their business), and we only 
want a product that fits well. But we have 
something that they cannot allow for: there 
are a lot of us. 

We could combine our purposes and 
share the costs of the enterprises. | heard 
thatin Quanta alone there are 2,000 users, 
still growing. 

| also think that Spectrum users should 
be involved too; a lot of them would love to 
upgrade to QL. We could collect hardware 
projects that individual users had devel- 
oped, and mix them to produce the major 
design. Of course main suppliers should 
be invited to combine with the whole group, 
sharing (selling?) experiences and tech- 
nology, and supplying parts. Their quotes 
must have a different value and return 
rates, because of their financial needs. 


Available 


The design should employ parts already 
available in the market, like power sup- 
plies, keyboards, video encoders and so 
forth, to reduce the costs of small scale 
production of new parts. The project also 
must be concieved with the possibility of 


extending the equipment so people could 
afford some modules at a time. 

Then a new worldwide enquiry would 
have to be carried out, to tell people what 
the new Mark II will be, what the versions 
would cost, and asking for membership 
payment. 

| wish | could give some ideas to improve 
the QL scene, and I'd like to hear about 
others’ improvements on that. 

Eduardo Fairbanks 
Brazil 


{fyou have an informed view of how the QL 
has developed during its history and where 
it should go from here, and want to offer it 
for publication, please write to the Editor 
for an information sheet, or submit a dou- 
ble-line-spaced text of no more than 2000 
words if you prefer. Personal Opinions 
should concentrate on the development of 
the QL in the light of personal experience. 
Responses to a published Personal 
Opinion intended specifically for the author 
will be forwarded; please say whether or 
not you are willing to have parts of your 
response quoted in Open Channel. Sorry, 
we cannot forward confidential mail. Short 
letters to QL World in response to Personal 
Options will be considered for Open Chan- 
nel in the normal way. 


NORWAY /ENGLAND —_m SCOTLAND 


Club Sinclair BruQsL (Belgium) 
Contact: Jaques  Tasset, 
Aarlenstraat 104, 1040 Brussels, 
Belgium 


International QL Conference 
bulletin board system (Swedish 
and English). Contact: Michael 
Cronsten, System Operator, 
Jamten-TCL, § Soere 1073, 83030 
Lit, Sweden 


New England Sinclair QL User 
Group (USA) Membershi 
Secretary: Sherm Waterman, P 
Box 8763, Boston, MA 02114 

| 8763, USA. Magazine: 
NESQLUG News. Editor: Peter 
Hale, 195 Central Ave., Chelsea, 
MA 02150, USA. 
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Norwegian All Sinclair Asso- 
ciation (NASA) Contact: P 
Monstad, NASA, N-5580 Oelen, 
Norway. Magazine: Sinclair 
Magazine. 


ITALY 


Qitaly Club Chairman: 
Roberto Orlandi, Via Brescia 
26,25039 Travagliato (BS), Italy. 
Tel. (local) +39 30 6863311. 
Magazine: Qitaly Magazine. 
Editor: Dr Eros Forenzi, Via 
Valeriana 44, 23010 Berbenno 
(SO), Italy. Tel. local} +39 342 
492323. 


TURKEY 


QL Qlub (Turkey). Contact: 
Bulent Artuz, Prof. Sitesi B/1 
D/5, Etiler 80600, Istanbul, 
Turkey. 


Quanta (UK) Membership Sec- 
retary, Bill Newell, 213 Manor 
Road, Benfleet, Essex SS7 4JD. 
Magazine: Quanta, Editor: Bill 
pugele, 20 Widnes Avenue, 
Selly Oak, Birmingham B29 
6QE. 


Bristol sub-group: Roy 
Brereton, 94 Teignmouth Rd, 
Clevedon, Avon BS21 6DR. 


Essex sub-group: Dave 
Walker, 22 Kempton’s Mead, 
Potters Bar, Herts EM6 3HZ. 


London sub-group: Jeremy 
Davis, 6 Elmcroft Crescent, 
Harrow, Middlesex HA26HN, 


Northern Ireland: Billy 
Turkington, Fairyhill, 
Rostrevor, Newry, Co., Down 
BT34 3BB. 


Qubbesoft PD library. Contact: 
Ron Dunnett, 38 Brunwin Rd, 
Rayne, Braintree, Essex CM7 5BU. 


Scottish QL Users Group Contact: 
Alan Pemberton, 65 Lingerwood 
Rd., Newtongrange, Midlothian 
EH22 400. Newsletter. 


Sin_QL_Air(Netherlands) Mem- 
bership Secretary: Bob Visser, 
Snelrewaard 6, 2904 SN Capelle, 
a/d_ Ijssel, Netherlands, 
Magazine: Quasar. Editor: CHM 
Biemans, Elzenstraat 5, 5461 CL 
Veghel, Netherlands. 


GERMANY 


Sinclair QL User Club eV (Ger- 
many) Foreign Contact: Franz 
Herrmann, Talstrasse 21, d- 
W5460Ochenfels, WestGermany. 
Magazine: Quasar. 


Qliper Editor: Marcos Cruz, 
Acacias 44, 28023 Madrid, Spain. 
Magazine: Qliper. 
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his DIY Toolkitproject extends QL 

SuperBasic in three ways. ALIAS, 

CODEVEC and INVERSE have 

been tested with Minerva, Argos 
and Turbotasks. They should suit all Qdos 
systems and compilers. 

The simplest new command is INVERSE, 
which swaps the foreground and back- 
ground colours used to display text in a 
window. Many computer displays support 
‘inverse video’, showing dark characters 
on a light background, rather than the 
reverse. Itis a good way to highlight selec- 
tions, whatever the colours in use. 

The name comes from the ZX Spectrum 
print attribute INVERSE, but the QL imple- 
mentation swaps INK and STRIP colours 
at every call; ZX BASIC INVERSE 1 and 
INVERSE 0 turned colour swapping on 
and off. The optional channel parameter 


defaults to #1. 


Youcan do the same with INK and STRIP 
commands, but then you need to read the 
‘previous’ colours with DIY functions like 
CHBASE and CHAN_ B%. Unless you are 
careful you end up with both colours set to 
the same value, and invisible text! 

INVERSE is simple, easily reversable, 
and preserves the original contrast. Itis a 
great way to add emphasis in menu dis- 
plays and prompts. 

ALIAS lets you give new names to QL 
commands and resident functions, like 
this: 


ALIAS “INVERSE” TO INVERT 

ALIAS ‘EXECUTE_A’ TO TRY 

ALIAS “SEARCH MEMORY” TO SCAN 
ALIAS ‘CODEVEC’ TO VECTOR 
ALIAS ‘OPEN’ TO OUVRE 


Users unaccustomed to English can 
translate much of SuperBasic into French, 
German, Spanish or whatever; the only 
restriction is the 26 character Ascii alpha- 
bet common to all QLs, which prohibits the 
use of accents in resident names. 

ALIASed names survive NEW and LOAD. 
They work at exactly the same speed as 
the names they mimic, since they use the 
same code. They are permanent, and 
consume no extra ram apart from eight 
bytes in the Name Table and the charac- 
ters and length in the Name List. You can 
get rid of them with FORGET. 

ALIAS forms a set with the resident func- 
tion-creators SET and ALTER, the FOR- 
GET routine in DIY Toolkit Volume B, and 
Task Commander, the Resident Proce- 
dure generator presented last month. It is 
another way of expanding the QL Name 
Table to make the system easier to use 
and program. The Name Table is an effi- 
cient mechanism that can cope with up to 
64K of names with no less of speed, once 
lines are tokenised. 

ALIAS only works on resident procedures 
and function names, so it cannot provide 
substitutes for all the words in QL pro- 
grams, but it can be convenient if you find 
yourself mistakenly typing commands for 
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Ye 


Simon Goodwin shows how to change th 
names — and colours — of keywords, and then 


track them down. 
other computers while using the QL or an 
emulator. Why teach yourself, when you 
can teach the QL on your behalf? For 
instance, SAM and Spectrum users might 
use: 


ALIAS “DELETE” TO ERASE 
ALIAS ‘DIR’ TO CAT 


Other substitutions will suggest them- 
selves to those who use several comput- 
ers. Some, like the Amiga CLI, match the 
QL commands quite closely already, 
though the QL is idiosyncratic in its use of 
names up to 36 characters long, replete 
with underscores! 

The syntax of ALIAS may seem odd at 
first, but mimics COPY, RENAME and 
ALTER. The first name corresponds to an 
existing resident procedure or function. It 
appears in single or double quotes, while 
the second, new name is not quoted. Thus 
the code can alias any existing function 
name, without fetching its value instead, 
and the string to be matched may be an 
expression. 

Each name may consist of up to 255 
digits, underscores, small or capital letters 
(considered equivalent). The second pa- 
rameter must be an unset name. The QL 
reports Bad Name unless the first name 
corresponds to a resident procedure or 
function. 

Other values can move around, allocated 
and de-allocated on the variable values 
heap inside SuperBasic; it would be dan- 
gerous to ALIAS such names, as you 
might end up with an invalid pointer to 
space that had been re-used. 

ALIAS works fine with the hundreds of 
names resident in every QL Rom, DIY 
Toolkit, SuperToolkit, and common ex- 
tensions in disk systems. A few QL names 
are implemented as ‘keywords’, rather than 
resident procedures or functions; these 
include DEFINE, LOCAL, NEXT, EXIT, 
WHEN, and variants of ON, END and GO. 

If you try to ALIAS these you get a Not 
found error because those names do not 
appear in the name table. The same goes 
for the separator TO, and operators like 
INST, OR and MOD. The only way to 
change these is to replace your rom. 

The ALIAS command should not be used 
inside Supercharged or Turbo programs, 


as they contain no name list, but ALIAS 
works fine declaring names that are ex- 
pected by compiled tasks. If a task reports 
‘name is redefined’, type NEW to clear out 
the name list, and try again. NEW, LRUN 
and CLEAR do not discard ALIASed 
names. 

ALIAS can be useful when running tasks 
compiled for some other system. A task 
expecting the Thor SYS_ VARS function 
stops, reporting ‘SYS_ VARS is not de- 
fined’ if run on a normal QL. It would be 
tricky or tedious to re-compile or patch the 
file to remove the reference. It is easier to 
load the DIY equivalent SYSBASE, and 
type: 


ALIAS “SYSBASE” to SYS_ VARS 


Eureka! You can use the same principle 
to emulate missing commands with func- 
tional equivalents from other Toolkits. 

The majority of names can be ALIASed 
in compiled programs without trouble, but 
you may miss out on updates or 
optimisations unless you are careful in 
your choices. 

Turbo and Supercharge replace calls to 
some ‘standard’ resident procedures and 
functions with optimised routines from the 
compiler library. They identify the key- 
words to be optimised by name and position 
in the name table, so you may get odd 
results if you use unconventional names. 

An alias of the PRINT command will 
work, but the rom routine is slower and 
displays only seven digits of precision, 
rather than the nine digits of the compiler 
library routine. Likewise MOVE_ 
MEMORY, BLOCK, CODE, CHR$, LEN, 
Pl, PEEK and POKE are optimised, so 
your task will go more slowly if you use 
ALIASed equivalents. 

RUN, INPUT, READ, EOF, CLEAR and 
DIMN work differently in compiled tasks, 
so you should expect strange results if you 
call them by new names. 

STOP and NEW will have no effect if you 
use aliased equivalents in a compiled pro- 
gram. These commands normally work by 
setting a ‘stop code’ at offset 140, 
BV.STOPN, among the SuperBasic Vari- 
ables; the interpreter checks this word 
after interpreting each statement, but 
compilers don’t do anything so silly; they 
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recognise the names, and substitute spe- 
cial code for STOP and NEW. 

An aliased version of OPTION _ CMD$ 
will always return a null string. You need 
the original name to get the desired result. 
The same goes for other Turbo directives 
like REFERENCE, IMPLICIT%, PROCE- 
DURE, FUNCTION and RETRY_ HERE. 

Compilers replace calls to RESPR with 
library code to allocate Common Heap 
memory. An ALIAS of RESPR will not be 
replaced, so it will give a ‘not complete’ 
error if called from a task. Minerva roms fix 
this by using heap space automatically if 
the RESPR area cannot expand. 

You may come across a few programs 
where alternative names like SINE and 
LOG will use the new code if you issue the 
ALIAS commands after loading. The new 
names will use the standard rom routines 
if you use ALIAS before any maths rou- 
tines are loaded. 

The function CODEVEC returns the ad- 
dress of the machine code routine that 
performs any resident SuperBasic proce- 
dure or function. You can use this address 
to disassemble the routine, or to set a 
breakpoint, allowing you to intercept calls 
to the keyword and step through the code. 

Which is easier to type? CODEVEC 
(“ED”) or BPEEK_ L (BPEEK_ L (24) + 
LOOKUP% (“ED") * 8 + 4)? This function 
could be replaced by a succession of calls 
to existing DIY Toolkit functions, but | find 
it useful and expect it to save typing for 
anyone exploring new resident code. 

CODEVEC is shortfor CODE_VECTOR; 
you can of course ALIAS it to anything 
else you like. To save more typing, ALIAS 
‘CODEVEC’ TO CV! | chose the name 
CODEVEC because it is easy to remem- 
ber, yet unlikely to clash with existing 
variable names. 

Youcanuse CODEVEC to detect names 
that correspond through ALIAS, or ones 
that share code because of Toolkit up- 
dates: 


DEFine FuNction CODEMATCH (a$, b$) 
RETurn CODEVEC (a$) = CODEVEC 
(b$) 

END DEFine 


Listing two starts with the usual hex 
loader, the same each month, unless you 
write in to say you prefer the decimal line 
version used for Task Commander. The 
DATA corresponds to the assembly code 
in listing 1, but can be entered relatively 
quickly. 

Check and correct the DATA lines if the 
loader reports ‘Checksum incorrect’ —oth- 
erwise, type the name of the file you want 
to create, eg FLP1_ALIAS_CODE. Be- 
fore using ALIAS, INVERSE or CODEVEC 
you load the code from disk, like this: 


X=RESPR (434) 
LBYTES FLP1__ ALIAS CODE, X 
CALL X yo : 


Alternatively you could use LRESPR, 
LINKUP to load and link the file, or ALLO- 
CATION to reserve memory if tasks are 
running. Avoid ALCHP as the space it 
reserves does not remain allocated when 
you load a new SuperBasic program. 

You do not need to retype the code from 
Listing one or Listing two. Binary code, 
original assembler source and documen- 
tation for ALIAS, INVERSE and 
CODEVEC are available now on 3.5 or 
5.25 inch disks, or your microdrive car- 
tridge. 

Ask for DIY Toolkit volume A for ALIAS, 
the latest of 18 volumes of utilities and 
extensions, available from Richard Alex- 
ander at Cwm Gwen Hall, Pencader, 
Dyfed, Cymru SA39 9HA, or ring (0559) 
384574, One volume costs £7, two. cost 
£10 and.so on, up to £58 for the full 1988- 
1991 set. 

| have updated two volumes with Task 
Commander examples: the MAP com- 
mand joins volume 
H, showing the ex- 
act allocation and 


* 


ownership Of} start lea.l 
memory on the tes 


heap, intask space, 
and elsewhere. 
Volume Q gains 


inverse moveq 
CHANS, a cmp-1 
SuperBasic key- ee 
word that shows jsr 
details of all the ares 
channels in use at bne.s 
any time. pes 
Listing one isthe | pick_chan malu 
program assem- moa, 
bled into re 
ALIAS CODE. a 
WhenyouCALLthe | got_ia eae 
first instructions lea.l 
they point A1 at the pt 
table labelled DE- trap 
FINE, read the a. 
BP.INIT vector moveg 
word from ROM, hd 
and jump to that moveg 
routine. It links the pullecg 
give_up rts 


names and ad- 
dresses at the end 


* 
colour_ext moveg 


into SuperBasic. ao 
The next routine move.b 
deals with IN- poring 


VERSE. The de- 
faultis INVERSE 1; 


* 


brackets, -hashes | arias leat 
and other punctua- oe 
tion are optional. tst.b 
The most likely er- oe 
ror reports are oven 
channel not open bri-s 
andbad parameter, rt 
if the channel is not moves. 1 
a CON or SCR ipa 
window. move. 1 
The Qdos call sbi 
SD.EXTOP is used muive. 1 
to find the details of eoveq 


the window. IN- 


VERSE says bad parameter if you apply it 
toa MEMchannel. The EXTOP works but 
the instructions to set the ‘ink’ and ‘strip’ 
fail. 

If you are looking for a simple project, 
consider adapting INVERSE to set both 
the PAPER and STRIP colours. This takes 
two Qdos calls in machine code; the 
SuperBasic PAPER command sets both 
to the same value. 

It is not enough just to swap the ink and 
paper values. EXTOP reads the colour 
values, avoiding QRam, QPac and Thor 
windowing variables, then calls SD.SETST 
and SD.SETIN to set the colours. 

D1 is the only data register passed both 
ways by EXTOP. | use it to return both 
colours, exchanging the high and low 16 
bit halves with a couple of SWAP instruc- 
tions. 

Two system calls update the colour 
masks SD.SMASK and SD.IMASK at off- 
sets 48-65 in the standard channel defini- 


* Q. WORLD DIY TOOLKIT ~— ALIAS, CODEVEC and INVERSE 
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define,al Point AL at definition 
$119,a2 BP.INEIT vector 
(a2) Link code to Super BASIC 


* 
* INVERSE { #ch% 2? - exchanges channel ENK &°STRIP colours 


#1,08 Assume channel 1 at first 
a3,a5 Any parameters? 
pick_chan 

$112,a2 Vector to get integers 
(a2) CA,GTINT 

Qive_up 

#1,d3 One parameter expect ect 


Otherwise, complain 
Get BASIC channel No, 
It must be @ or more 


bad_param 
B(al,as.1),d8 
what chan 


#429,d8 Scale for Channel table 
481aé),dd Add the base offset 
S2(aé),d0 Check it if within table 


Reject tf past’ the end 
Pick up the channel ID 
Negative if closed 


what chan 
0(a6,d0.1),da 
what chan 


ag, ag Now A® is channel ID 
colour_ext,a2 A2 —> extension code 
#-1,d3 Infinite timeout 

#9,da SD.EXTOP trap key 

HS Call OBDOS 10 system 

de Check for any error 
give_up 

#40,d0 SD.SETST trap key 

#3 Set STRIP colour in D1.B8 
dt 

#41,da SD.SETIN trap key 

#3 Bet INK colour 

#0,d1 Clear odd bytes of result 
69 (a@),di Pick up STRIP colour byte 


di Prepare other half of Di 
7Ola@) di Pick up INK colour byte 
#A,de@ MK, no error 


Ww 
* ALIAS "OLD_ NAME" TO NEW_NAME for Resident Proce & Functions 


14(a3),a4 ‘ 
a4,ah Two parameters please 
bad_param 

Blas, ab.1) Check type of parameter 1 
bad_ param Reject unless it is unset 
43,45 


IGlad,ab.1),d5 
bad _param 
#3,d5 


Pick up the name’s inden 


Scale; 8 bytes per entry 


24(a6),d05 Add NT base offset 

d5,-(a7) 

Blatt) ,aS Isolate remaining parameter 
lookup Evaluate parameter 2 
(a7)+,a5 

bad_exit 


9la2,a@.1),H@(as,a5.1) 
4la2,a@.1),4(a6,a5.1) 
#8, d9 
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param 
exit 
t_chan 


evec 


urn fp jWOWe. we d1,d4 B4 will be exponent next name move.w 2la@,a2.1),a3 Pick up offset in NL 
| move. 1 di,d3 DS will be mantissa adda.1 d3,as {AS,AZ.L) -> Name 
beq.& normal i sed Zero is a trivial case cmp.b Bia3,a2-1),d5 Compare length 
PO vee. #2079,d4 Fi ret quess at exponent beq.=s got_length Length matches! 
add, di,di Already normalised? advance_nl addq-1 #8,aa Advance through NL 
bvs.s normal i sed cmp. i ad,da Btop at the end 
subg. W #1,04 No, halve exponent weight bhi.s next name 
move. 1 di,d5 Double mantissa ta match moved #-7,00 Signai NOT FOUND 
move dq #16,d8 Try a 14 bit shift rts 
mlise move.1 d5,d1 Take copy of mantissa * 
asl.1 d@,di Shift mantissa D® places * Check the name text to see if it matches the parameter 
bvs.s too_far Overflows mist shift less * 
sub.wW da,d4 Correct exponent for shift got length move.b i({a3,a2.1),d4 
move. 1 di,dS New mantissa is more normal orb a7,d4 Ensure consistent case 
tar asrew #1,d0 Halve shift distance cep.b @iaS,a6.1),d4 
bne.s normal ise Try shift of 8, 4, 2 and 1 bne.s advance_nl Mismatch, try another 
move.w d5,dé Save residual length 
ck there's six bytes of space for the result subq.w #2,d6 DBRA count for the rest 
bmi.s found_it Found name, length 1 
lised moveq HS, d1 No. of bytes needed move. t ad,a4 D4 & A4 are temporary 
move.w 1l1A, aa BYV.CHRIX vector check_name move.b 2fa3,a2.1),d4 
jsr (ae) or.b 7,04 Convert case of name 
move. 1 #568 (ad),a1 Get a safe Al value addq.1 #1,a3 Step through Name List 
subg. 1 #6,a1 adidq.1 #i,a4 Step through parameter 
movin. 1 a1, #58(aé) Grab 6 more bytes cinp-b @(a4,a6.1),04 
mave. 1 dS, 2(at,ad.1) Stack mantissa dtone dé, check_name 
MOVE. i d4,@lal,aé.1) Stack exponent pas 
acvaa #2, 04 Floating point result P bne.s advance_nal Name mismatch, go on 
aie #0, c@ * Check that the name is a Resident Procedure or Function 
* 
OOKUP "string parameter" ~- NT entey @ (A2,A@) or error wane meee rp ual Coe type code 8 or 7 
up move.w $1146, a8 Fetch CA.BTSTR vector an eal ee Check type code <= 9 ('> 
no Cag) Fetch string parameter bpl.s wrong_type 
1 = bad exit Quit unless it worked 7 Ci A 
: subq.w #1,ds Check for ONE parameter ear “eee ee ere eg) CODEVED a8 ain We 
bone. bad param Moan, otherwise * 
MOVE. W @lal,as.1),de = NAME 
beq.s bad param Reject a null parameter ornatyne erie. nee pee ecnor ends 
POV ob d@,d5 Save length for later « 
lea. 2ial)b,aS Save offset of text define @e.m 2 Two procedures 
quate UPPER/lower case; set bit 5S of parameter bytes ar cn ae 
moved 832,07 Case conversion mask —— S eigniveiea 
moved #L,d2 Odd/even length mask de.w e 
and, 1 dB,d2 D2=1 if length is odd dee 1 One function 
‘kcase or.b d7,2{al,aé.1) dew codavec=* 
addq-1 Wi,al Advance through text de.b 7.* CODEVEC’ 
subq-w #1,aa Count down length de. c 
bne.s lock _case Convert a11 characters and 
lea. 2tal,d2.1),al 
move. 1 Tidy the RI stack 


tion. These masks determine the pattern of 
bits set in video memory, and hence the 
colour displayed. 

INK 0 is the simplest case. It clears the 
mask to zero. In MODE 4, INK 7 sets a 
mask of all bits set. This is the video memory 
pattern that corresponds to a white display. 

The masks depend on the screen mode, 
as well as the colour and stipple. The first 
word of the mask is used on even num- 
bered lines, the second on odd lines, to 
give stipples two pixels deep. In MODE 4, 
INK 7, 0, 1 stores the masks $FFFF and 
$0000 in SD.IMASK. In MODE 8, the same 
command stores $AAFF and 0, unless you 
select FLASH 1. 

There are many cases to consider, and 
they might vary between machines; it is 
best to use normal Qdos colour codes, 0- 
255, and leave calculation of the masks to 
your system. 

ALIAS works rather like ALTER from May 
1991’s QL World. It converts an unset name 


ETURN FF stacks Di,l in SuperBasic floating-point form 


ail, $568(aé) 
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into a resident function — or procedure, in 
this case — by setting the first, third and 
fourth words in the corresponding name 
table entry. The second wordis unchanged. 
It points to the name text in the name list. 

Phil Spink observes that Unix program- 
mers may prefer to type ALIAS NEW TO 
“OLD”, in the style of an assignment. The 
DIY code is flexibly written so it can proc- 
ess the parameters in either order, with the 
minimum of tailoring. If the fourth and 
seventh lines of ALIAS use offsets 8 and 10 
the unset parameter is the second one. 
Offsets 0 and 2 specify the first parameter. 

The other parameter must be the ‘old’ 
name string. LEA.L 8 (A3),A5 singles out 
the first parameter for string LOOKUP; 
alternatively LEA.L 8 (A3),A5 selects the 
second. The DIY disk includes code and 
source to process parameters either way 
round. 

CODEVEC calls LOOKUP to find its pa- 
rameter, then plucks the relevant address 


* 


moveq #-15,d0 Signal BAD PARAMETER error * Now find SuperBASIC task (9,8) and its Name Table 

rks Error code is in Da * 

moved #-6,d@ CHANNEL NOT OPEN error moveq #S,d2 Search entire task tree 

rts moveq #O,d1 Look for SuperBAsIc 
moveq #2,0d0 MT.JINF Trap key 

ODEVEC ("MAME") returns code address for any Resident NAME trap #1 A@ := base of task @,4 

move.1 a@,a2 A2 —-> BASIC system vars 

bar.s lookup Try to find the name move. 1 24 (a2) ,aB A@ —> Name Table Start 

bne.s bad_exit move.t 28 (a2) ,agd D@ —> Name Table End 

move. 1 Atad,a2.1),d1 Pick up its code address move.l 32(a2),a3 D3 -> Name List Stert 


* 
* Scan the 
* 


Name Table for names with the right Length 


DIY TOOLKIT 


from the name table with a single instruc- 
tion. DIY code must work on all QLs and 
compatible systems, and most do not allow 
long integer function results, so it converts 
the value in D1 into a floating point value. 
The NORMALISE loop shifts the binary 
value of D5 to the ‘normal’ position at the 
left, adjusting the exponent in D4 accord- 
ingly. 

CODEVEC must check that there are six 
bytes for its result. The slow call to 
BV.CHRIX could be avoided if the name is 
at least three characters long, as the result 
will fit in the space previously allocated to 
the string on the maths stack. 

The last machine code subroutine, 
LOOKUP, resembles the eponymous key- 
word code. This version shows how two 
extensions can share code to fetch and 
analyse a parameter. It resets BV.RIP so 
that memory is not left allocated on the 
Maths Stack after the parameter has been 
processed. 
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Emme sssssss—seOSS_ 


REMark Sinclair @L World HEX LOADER v 3 


CLS: RESTORE : READ space: 
PRINT “Loading Hex...” 
INPUT "Save to file... 
SBYTES f%,start, byte : 


"> 
STOP 


DEFine FuNction DECIMAL(x) 


RETurn CODE(h8{x) )-48-7*(hS(x)>"9") 


END DEFine DECIMAL 


DEFine PROCedure HEX_LOAD(start) 


byte = @ : checksum = @ 

REPeat load_hex_digits 
READ h$ 
IF h$="*" 
IF LEN(h8) MOD 2 


PRINT"Odd number of hex digits in: 


STOP 
END IF 
FOR b = 1 TO LEN(h$) STEP 2 

hb = DECIMAL(b) : 


END IF 
POKE start+byte, 16*hb+1b 


checksum = checksum + 16*hb + 1b 


byte = byte + 1 
END FOR b 
END REPeat load_hex_digits 
READ check 
IF check <> checksum 


PRINT"Checksum incorrect. Recheck data." 


END IF 
PRINT"Checksum correct, 


LOOKUP reads its parameter as a 
SuperBasic string, to avoid problems with 
function names. The check on the value of 
D3, the number of string parameters, is 
only relevant when called from CODEVEC; 
ALIAS sets A3 and A5 to delimit a single 
parameter. 


) QL SUPERTOOL KIT Il by Tony Tebby 


| Over 118 Commands:- Full Screen Editor, Key Define 
"Print Using, Last Line Recall, Altkey, Job Control, File 


| Dual 3.5" Disc Drive & (Own PSU). 
| 3.5" DSIDD Discs - 10 off 


@£20. 
@£25,00d SIDEWINDER PLUS - (for expanded QL’s) includes all 


HOW TOORDER: 


start=RESPR( space) 
: HEX_LOAD start 


: EXIT load_hex_digite 


> 1b = DECIMAL(b+1) 
IF hb<@ OR hb>15 OR 1b<@ OR 1b>15 
PRINT"TIllegal hex digit in: 


data entered at: 


DATA 432 


DIY TOOLKIT 


END DEFine HEX_LOAD 


REMark Space requirements for the machine code 


REMark Machine code data 


DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA 
DATA “*", 


“jhs 


“jh$ : STOP 


: STOP 


“;start 


As written, LOOKUP searches for names 
in the tables of SuperBasic task (0,0). This 
suits Turbo and Supercharge, but users of 
QLiberatorand Minerva 1.8x, which create 
extra name tables, might want the scan to 
examine the current task. 

To achieve this, remove the five lines that 


| apac f by Tony Tebby 


MA\ S 
PAC Man mens windows ads automata sz, 
Files, directory, view, print, delete, backup, jobs, pick, 


"43FA018A34790000" , 
“6714347990000112" 
"303 1EB906B7CCOFC" 
"@O3 46 C6E2B360890" 
“ 76FF7299 4E434A80", “ 
"76294E434E757220" 
"@@4672004E7549EB", 
"“E808662A7 AQD3A33" 
"@O182F 95 4BEBGOGE “ 
“B88O0ODB292DB28894" 
"4E7570FA4E75614A", 
“2A@1671C383C081F" 
"70102 205E1A16904" 
"7206307 89000011A" 
"2D49@9582385E802", " 
“4E7 5307990000116" 
"303 1EBQG67983A00", 
"C4808F31E8925289", 
"2D4990587 4007 200" 
"“@B18 292490102624" 
"BA33A8006 70A5088", 
"1833A8018807BB835~ 
"6B16284D1833A8G2", 
“E8QO56CEFFFO66CE” 
"55916AV470004E75" 
"@5414C494153FE76", 
"GQOOOOO 1F FO28743" 
36114 


"@1184ED27001BBCB" 
, '4E9266385343667E" 
» "@O2ZBDOAEAD3IOBOAE" 
, "6BB8204945FAG018" 
660A70284E434841" 
"1228004548411228" 
“@@1OBBCCE63C4A33" 
"EB@AGB22E78DDAAE” 
“61682A5F66123DB2" 
"DED4A7TOMO4AET 5S 7OF 1" 
“66F62230A8043801 “ 
"D2681691453442A01" 
,"9B40ZAB1LE2Z4O66F2" 
"4E90226E@0585D80" 
33B84E8007 8027020" 
"4E9966445343669E" 
4BE9O9027E207 401" 
"534@66F643F 12602" 
“7002 4E412448206A" 
"902036 70ABO2D7C3" 
“BOBBB2EER7OF94E75" 
“EBO@OEGEASCH55546 ~ 
"8807528B5286CB834" 
"123048005 1016B08" 
"TOF 44E7 50092FEDB" 
"@7494E5645525345" 
"4F 44455645 430000" 


point register A2 attask (0,0) and replace 
subsequent references to A2 with A6, 
the current task base. This entails changes 
to eleven operands, and one comment. 
The resultant code is ten bytes shorter. 
The DIY disk includes both implementa- 
tions. 


Ce el , ; 
Switch mode power supply, QL runs cool, 
stops, lock ups (due to voltage drop). Helps 


Riob, sort, channels, things exec, wake, buttons, Hotkey, filter noise out. Simple to fit (no soldering) 
see Fully multitasking, allows io Ap beige £25.85c 


at once. Requires min of 256k expanded memory .. 
Upgrade QRAM to QPAC Il return master ...@29.61b 


SAE FOR 
A COPY OF THE QPAC Il 


COLOURED PRINTER 
wie fl 


pson 
oat ein te 
Panasonic KXP 1080 .. 
Star LC10 ... 


QTYP Cl 
QPAC 1-Desk top accessories, calander, alarm, a rade. 
tor, , digital clock sysmon @£22.56d 


ZITASOFT SOFTWARE by Steve Jones 


| RGB 8-6 PIN 
RGB 8-7 PIN 


LOCKSMITHE copies M/DRIVE - M/DRIVE @£14.10c AGB 8-7 PIN FERGUSON... 


“MATTER + LOCKSMITHE copies MORIVE- DIS 

506 
SIDEWINDER - High resolution printer driver prints full 
screens or parts of screens from postage stamp size to 
large banners. Prints sideways, invert, scale, mirror, text 
insertion .. 21 


the features of above, PLUS multiple label printing, desk- 
top publishing files and printer driver for The LC10 JX80 
Co oes 


By Pout. Enciowe your Cheque/PO made payabe to CARE Electronics or use ACCESSIVISA Allow 7 days for delivery 
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RGB 8 PIN TO SCART ... 
@WAY PCC TO 25WAY ‘D 


24 Hour Order Line 0923 sosos 
OPEN 
Sam-5pm Mon-Thu 
gam-4pm Fri 


CARE ELECTRONICS 


DEPTQ tte ea te GDNS 
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PSION SOLUTIONS 


‘vejust comea cropper with 

Quill (v 2.3). I realise it 

wouldn't have happened had 

I backed up files but even so it 
looks like a serious bug to me. 

If one tries to save a _doc file 
with an existing filename one is 
asked whether the old file is to be 
deleted. Pressing <ESC> returns 
one to the original prompt, for 
example ‘Save, flp2_letter_doc’. If 
one then attempts to save the file 
by overwrifing this prompt by 
typing in, say, ‘letter2’ Quill takes 
no notice but deletes the original 
file and saves the new one with the 
old name. 

Hilary Snaden 
Portishead 
Bristol 


I can confirm that this hap- 
pens with both versions I have 
available too (QLWP 2.1 and 
Quill 2.35), Hilary Snaden’s 
careful observation explains 
the loss of more than one of my 
files! There seems to be no way 
to cure it without modifying 
the code for Quill itself, so it 
just has to be lived with. The 
only answerif youchange your 
mind while saving is to re- 
member to press <ESC> 
TWICE and then repeat the 
entire save sequence with the 
new name. 


Bugs 


This is probably an oppor- 
tune introduction to a cata- 
logue of other bugs and incon- 
veniences in Quill. There is 
another serious bug in all ver- 
sions: if you use the Erase or 
Copy functions the program 
partially loses track of cursor 
movements. Pressing <SHIFT 
down-arrow>, which usually 
moves the cursor to the start of 
the next paragraph, has an er- 
ratic effect. More seriously, 
repeated use of <up-arrow> 
may lock up Quill altogether 
without warning. In my expe- 
rience it is only <up-arrow> 
that causes the problem and it 
is only Quill that is locked, not 
the whole QL, so if you are 
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Why does Quill V2.3 take the law into its own 


hands when you ask it to save a new file under 
an existing file name? Why won't the Psion 
suite save one reader’s files to disk? Howard 
Clase catalogues some Quill bugs, looks at Ron 
Massey’s alterations to install_bas, and offers a 
modification to his own program FTidy. 


multitasking you can still get 
at your other programs, 
ramdisk files, etc. 


Pointers 


Contrary to some advice | 
have read, you cannot reset the 
pointers by going to the top or 
bottom of the _doc, You can 
avoid using up-arrows by us- 
ing <SHIFT up-arrow> to get 
to the top of the paragraph and 
coming down line by line, but 
it’s probably safer to save and 
reload your document after 
using either of these two com- 
mands as I always do. If you 
can use Toolkit II to generate 
‘macros’, this only involves a 
couple of keystrokes. Note: It’s 
the reloading that resets the 
pointers; you cannot get away 
with saving alone if you are 
going to do any more work on 
the file. 


Printer 


Another way to lock up Quill, 
and your printer port as well, 
is to ask Quill to print some- 
thing without having a printer 
ready and waiting at the other 
end of the printer cable. The 
<ESC> key has noeffect in these 
circumstances. [fitis justa case 
of pressing the on-line button 
on the printer, then the situa- 
tion is recoverable, but switch- 
ing ona printer or plugging in 


a printer cable while the QL is 
running, risks a chip-destroy- 
ing surge. That said, I some- 
times do switch on my printer 
after the QL, but I have taken 
care that it is plugged in to a 
different main circuit. That 
hasn’t prevented my wife from 
starting up the Electrolux on 
the same circuit as the QL, but 
without causing any problems 
— so far! 

There are a few other quirks 
of Quill that beginners may 
come across, which, while they 
aren’t absolute disasters, can 
be frustrating if youdon’tknow 
what is going on. 


Headers 


Firstly headers and footers. 
The default settings when Quill 
is switched on are: no header, 
and a footer that prints ‘page 
1’, etc. at the bottom centre of 
each page. Unfortunately the 
default page design expects the 
top of the sheet to be at the 
print head, not at the tear off 
bail, which is where it is con- 
venient to put it. This means 
that if you are using form feed 
paper, ‘page 1’ appears not at 
the bottom of page one, but at 
the top of page two. You can 
get around this by putting the 
perforation at the print head — 
but this means wasting one 
sheet every time you print a 
letter. 

My personal solution to this 
is to get into ‘Design’ <F3,D> 


and set the upper margin to 0 
and the bottom margin to 9. 
This is about right for the top of 
the sheet at the bail. lalso prefer 
to have my page numbers at 
the top rather than at the bot- 
tom, sol set the footer to “none” 
and the header to “nnn”, which 
prints the page number in or- 
dinary Arabic numerals. 
Footer and header work 
similarly: after you have de- 
cided whether you want your 
message left, right or centre you 
are presented down at the bot- 
tom left corner of the screen 
with the present message if 
there is one, otherwise the line 
is blank waiting for you to type 
it in. The enhanced Psion line 
editor I mentioned in an earlier 
article is available, so you can 
use SHIFT with the arrow keys, 
etc. If you include “nnn” in 
your message it is replaced by 
the page number in Arabic 
numbers. (‘rrr’ gives Roman 
numerals and ‘aaa’ alphabeti- 
cal labelling — upper case, eg 
‘NNN’, has thesame effect. You 
have to type them in, not say | 
them.) | | 


Bold 


The last question asked when 
you are resetting footers or 
headers is ‘bold’. While Quillis 
able to remember the position 
and content of your message it 
seems to suffer from amnesia 
whenit gets to the typeface-so 
you have to press ‘n’ every time 
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if you don’t want your header 
in the default bold type. 

This leads me to another 
problem which | met when | 
had a fading ribbon and tried 
to compensate by printing a 
whole articlein bold type. Quill 
thinks ‘normal’ is whatever the 
main textisin,and doesn’tsend 
any typeface codes to the 
printer when printing header 
and footers, but I had set the 
header to bold. The result was 
that, having printed the header 
in bold, it sent the code to turn 
bold off, and the main page 
came outin normal type. When 
I set the header to ‘normal’ it 
didn’t change the typeface and 
everything came out as | 
wanted it — all bold! You’ve 
just got to look at things the 
way Quill sees them. 


Def_tmp files 


I'm writing this while on a 
short sabbatical in England 
using a basic 128K QL and a tv 
set. Perhaps all contributors 
should do this from time to 
time, since I've discovered an- 
other annoyance that I never 
would have met on my 640K 
disk drive OL at home (NB Ms 
Editor, that’s Newfoundland, 
) not Nova Scotia). Let's just say 
Canada. The code for Quill it- 
self takes up so much memory 
in the QL that there is only 
enough room for about 700 
words left on an unexpanded 
QL, so when this is full Quill 
sets up a special file, def_tmp, 
on mdv2_. It keeps the whole 
of your text in this and only 
keeps the bit you seem to be 
currently interested in in the 
active memory (in computer- 
ese, it uses the mdv tape as 
virtual memory). 


Merging 


This can slow things down, 
while the mvds whirr as you 
move about your document, 
so lam trying to write my arti- 
cle in short bits, only merging 
them together when every- 
thing is finished. Obviously, 
since the tape in mdv2_ con- 
tains part of your doc, you can- 
not take it out to save a second 
copy as a backup, but you can 
take out the Quill tape from 
mdv1_ and make a copy on 
that microdrive. (Remember to 


put the Quill tape back before 
you print.) When you leave 
Quill with quit, or zap a file, it 
should delete the def_tmp file. 
However, if you load a new 
shorter file without ‘zapping’ 
the original doc then the 
def_tmp file remains on your 
cartridge taking up unneces- 
sary space. You can delete it 
from within Quill using the 
‘files’ command <F3,F3,F,D>; 
for once Quill seems to be in- 
telligent enough to allow this 
only if the def_tmp file is not 
part of your current doc. 

If you do forget, and try to 
change cartridges in mdv2_ 
while there is an active 
def_tmp, Quilldoesn’t give you 
agentle reminder, itsays: “Fatal 
error — restarting Quill”, and 
your document is lost. Even 
though it seems to be starting 
again from scratch it gets very 
possessive about the original 
cartridge and won’taccept any 
other — it’s best to reset at this 
point. 


Configured or 
confused? 


Mr Raymond Fowles of 
Liverpool has upgraded hisOQL 
to disk, but is having problems 
getting his Psion suite to run 
on his new system. In particu- 
lar he has been unable to save 
any of his files to disk. 

Mr Fowles’ problem arises 
because each of the Psion pro- 
grams hasa number of ‘default’ 
devices built into its software. 
If you are still using the origi- 
nal versions, you will probably 
have noticed that when loading 
or saving a file in any of the 
Psion suite you do not have to 
tell it which microdrive to use 
as you do in Basic. It just as- 
sumes you mean mdy2_; al- 
though you can over-ride this 
default by typing the device 
name before the filename, eg if 
you type in “mdv1_letter” it 
will save it to mdvl1_. (1 
wouldn’t recommend this as a 
regular habit, as there isn’t very 
much extra room on the Quill 
cartridge.) 


Whirr 


Also if you ever need help or 
want to print a document you 
will notice mdv1_ whirr for a 
bit before anything happens. It 
is because of the built-in de- 
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faults in the code that Quill 
knows where to look for the 
appropriate files. 

If you put your Quill car- 
tridge into mdv1_ after press- 
ing F1/F2 and type “copy 
mdv1_quill to scr_” at the 
keyboard you will see the code 
for Quill spew out onto your 
screen; most will be gobblede- 
gook, but occasionally recog- 
nisable words will appear, and 
amongst them you will see 
mdv1_,mdv2_,mdv1_inclose 
succession. If you have an (or 
even THE) editor or a monitor 
you will be able to find them 
more easily and even alter 
them, for this is where the 
names of the defaults are hid- 
den. 


Config_bas 


There is no need to spend 
money on an editor though; 
there is a program called 
config bas supplied with the 
Psion suite. In fact there are no 
less than three identical copies 
of it, one on each master, apart 
from Archive. You can use any 
copy to configure any member 
of the suite. As far as I can see 
thereis nosignificant difference 
in the various versions of 
config _bas that come with the 
different versions of the Psion 
suite, but, if, like me you have 
more than one version, it is 
probably safest to use the right 
one — I haven't tested them all 
exhaustively. 


Reconfigure 


To re-configure your copies 
of the Psion suite, first reset 
your QL and press Fl /F2 be- 
fore inserting your Psion car- 
tridge into mdv1_. Then enter 
the command “LRUN 
mdv1_config_bas”. In opera- 
tion config_bas is easier to use 
than install _bas; just follow 
instructions. First it asks you 
for the name of the program 
you want to configure and 
where it can be found (mdv1 
and mdv2are the only options, 
so you will have to copy your 
reconfigured program to disk 
later). Youcan reset the default 
devices for all four Psion pro- 
grams and for Abacus and 
Archive there is the additional 
option of changing the sort 
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order — I'll come to that later. 

The three device defaults in 
order are: 

1. The device that contains 
‘system information’; in prac- 
tice this means the location of 
the printer drivers~printer_dat 
or gprint_prt in the case of 
Easel, 

2. Where you keep data files: 
eg _doc files in Quill or _aba 
files in Abacus. 

3. The location of the _hob 
files which are called up when 
you press <F1> for HELP! 


Dual Disk 


If you have a dual disk sys- 
tem then the obvious thing is 
tosimply swap flp1_formdv1_ 
and flp2_ for mdv2_.Iflike me, 
you have only one disk drive 
then you can either set all three 
devices as flp1_, or use a ram- 
disk as [ do. I set the ‘system’ 
device as ram8_, and have al- 
tered my boot to copy the ap- 
propriate dat file to 
ram8_printer_dat before 
EXEC_Wing the Psion pro- 
gram. [have differently named 
_dat files for different purposes 
and use the backup facility, 
<F3, F3, F, B>, if I want to 
change ram8_printer_dat. N.B. 
it must always be called 
printer_datinram8_ whatever 
it’s called on the disk — you can 
change the name when you 
copy or back it up. 

If you run config bas with 
Abacus or Archive you can also 
change the sort order, ie the 
alphabetical order used when 
strings are sorted. If you are 
using English only then you 
probably won’t want tochange 
it. This facility is primarily 
made available for users of 
other languages which use 
other sequences — for example, 
in German a-umiaut is treated 
as equivalent toa, butin Finnish 
it comes almost at the end after 
z, but before o-umlaut, and w 
and v are considered equiva- 
lent. (This might come in use- 
ful if you are ever using the 
Helsinki phone directory!) 

There is an alternative way 
of dealing with running the 
Psion suite on disks — or any 
other programs that have built 
in references to microdrives — 
and that is to use the FLP-USE 
command which is present in 
almost all disk interface soft- 
ware. Edit your boot to include 


the following line before any 
reference to mdv is made: 


nnn FLP_USE MDV (where 
nnn is an appropriate line 
number.) 


This statement makes ‘flp’ 
an alias for ‘mdvy’ so an in- 
struction to look for a file on 
mdvw2_ is redirected to flp2_ 
for example. I prefer to call a 
disk a disk and not to indulge 
in euphemisms of this kind, 
as you can get into a muddle. 
Obviously you can only do 
this without using config_bas 
if you have dual disk drives, 
and you will cut yourself off 
from access to your 
microdrives themselves. 


One More 


Mr Fowles also refers to 
some alterations to install_bas 
proposed by Ron Massey in 
QL World, It is not necessary 
to do anything to install_bas 
when you convert to disks, 
just copy over the printer_dat 
files and they will work as 
they are. Install bas enables 


you to design your own 
printer_dat files which the pro- 
gram refers to when it needs to 
know the special codes your 
printer uses to create effects like 
superscript, bold, etc. 


Alterations 


Ron Massey’s alterations rep- 
resent one approach to solving 
the problem of wanting to pick 
and choose between different 
versions of printer_dat for dif- 
ferent situations — especially 
when you have more than one 
of the Psion Suite on the same 
disk. I go along with him as far 
as giving each version a dis- 
tinctive name, but you can do 
that with the COPY command 
eg COPY mdv1_printer_dat to 
flp1_Quillnlq_dat. 

His approach also involves 
altering the code of your Psion 
programs, and you cannot do 
that without an editor or some 
skillat writing SuperBasic. Even 
if you do follow his suggestions 
your new version is still re- 
stricted to one named _dat file. 
Using the backup facility in the 


way I describe above is more 
flexible and doesn’t require any 
alterations except a bit of re- 
naming of printer_dat files. 

The main trouble with both 
config_basand install_basis that 
both are designed to operate 
with microdrives alone so you 
have to modify or create your 
files on microdrives and transfer 
them to disk, oruse the FLP_USE 
command. It only requires a 
smallamount of editing to make 
disk versions of these programs. 
[ will investigate and report ina 
future article. 


FTidy bug 


Some readers have been hav- 
ing problems witha file handling 
program of mine called FTidy 
which was available through QL 
World’s mdv exchange. This was 
primarily intended for QLers 
with disk drives and requires a 
small alteration to run on a QL 
with microdrives only. In order 
to manipulate the directory it 
has to be read into a temporary 
file, and the program assupplied 
tries to put this onto flp1_. To 


use FTidy with microdrives load 
the program FTidy_basand type 
EDIT 640, you should get a line 
starting: 


640 DATA “FLP1_”: REMark... 
Edit this to read: 


640 DATA 
REMark... 


“MDV1_”: 


and press enter. Delete 
FTidy_bas from your working 
cartridge and save this modified 
version as FTidy_basinits place. 
You should have no further 
problems, as long as there is a 
tape in mdv1_ with enough 
space fora short file -two sectors 
is probably enough. If you do 
have a ramdisk then use this 
rather than mdvl_, it is much 
quicker. If you still have prob- 
lems then please write to me c/ 
o Sinclair QL World. 

This only applies to the origi- 
nal SuperBasic version of FTidy. 
A Q Liberated version, with a 
superbasic program to enable 
you to configure the devices has 
been sent in to the new 
microdrive exchange, but ad- 
ministrative problems have 
prevented it from appearing yet. 
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ARCHIVE 


A=N+S-W=E+R-S 


rchive's numerical abilities are these string integers, and back again. As 
really quite impressive. Numbers Robin Stevenson with all Archive Answers, input into a pro- 
are stored to 14 significant ‘ cedure is via calling parameters, and out- 
floating point figures, to a maxi- offers the Archive put is via global variables: ANSWER for 


mum value of some 1.7E38 — by my string, and ANSWER for numeric output. 
reckoning that is plus or minus 170 billion user several Once the numbers are held as string 
billion billion! alternative tools to values they canbe concatenated together, 

The downside of this powerful feat is that : so that one string variable can be used to 
Archive numbers still occupy enough assist number- hold up to 127 such values. Once in such 
space for such numbers (8 bytes), even if handling. a string variable, these numbers are very 
all you want to store are numbers be- easy to deal with en bioc. It is easy to 
tween 1 and 10, or even just to store a 
zero. That does not matter on a small 
database, but in applications where large Table One. Which procedures are needed by each data structure? 
amounts of small numbers are involved, it 
can represent a huge waste of both Encode Decode | Array | Array | Array | Push | Pop} Pull] Array | Array 
computer memory and disk/microdrive | Dim | Store Insert, Cut 
space. | 

Another problem with Archive numbers 
is the inability to define arrays or sets of 
any sort. Each number has to be held ina 
variable of its own. This presents all sorts 
of problems, both in terms of the awk- 
wardness of this kind of data handling, 
and in the inefficiency of space it can lead 
to. When devising a new record structure, 
you have to allocate every number vari- 
able you may need— even if in most of the 
records, it will be carefully storing zero to 
fourteen significant floating point figures. both the dataaccess and datastoragefor duplicate the whole set, by simply assign- 

This Archive Answers will not be a fin- particular kinds of problems. The data _ ingitto another variable. Youcan also find 
ished application. Instead it offers the —typeusedwillbeintegers(wholenumbers) the total number of elements, by simply 
Archive programmer several alternative in a range of plus or minus 36000 or so. dividing its length by two. And because 
sets of tools to help overcome this situa- | Thiscanbestoredintwobytesofanormal Archive uses variable length string vari- 
tion. They represent severaldifferentdata _ text string. The two short procedures in ables, they only occupy the space they 
structures, each of which may improve listing one convert Archive numbers into —_ need. What is not so easy is dealing with 


Listing One 


proc Encode; VALUE 
let VALUE=VALUE+32639 

let ANSWERS=chr (VALUE/256) +chr (VALUE- (int (VALUE/256) *256) ) 
endproc 


proc Decode; ITEM$ 
let ANSWER= (code (ITEMS (1) ) *256) +code (ITEMS (2) ) -32639 


endproc 
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Listing Two 


proc ArrayDim; ELEMENTS 


let ANSWER$=rept (chr (127) , ELEMENTS*2) 


endproc 


proc ArrayStore; ARRAY$, ELEMENT, VALUE 
local LENGTH: let LENGTH=len (ARRAYS) /2 
if ELEMENT<=LENGTH and ELEMENT 


Encode ; VALUE 
if LENGTH=1: return : 


else 


if ELEMENT<LENGTH 


endif : endif 


else 


endproc 


endif 
if ELEMENT=1: let ANSWERS=ANSWERS+ARRAYS (3 to ) 


let ANSWERS=ARRAY$( to (ELEMENT*2) -2) +ANSWERS$ 
let ANSWERS=ANSWER$+ARRAYS ( (ELEMENT*2)+1 to ) 


: print "ArrayStore: element out of range" 
let ANSWERS$=ARRAY$: endif 


proc ArrayGet ; ARRAY$, ELEMENT 
if ELEMENT*2<=len (ARRAY$) and ELEMENT 
Decode; ARRAYS ( (ELEMENT*2)-1 to ) 
; print "ArrayGet: element out of range" 


else 
let ANSWER=0: endif 
endproc 


proc Show; ARRAYS 


ArrayGet ; ARRAYS, COUNT 
print COUNT; ":";ANSWER 


endproc 


local LENGTH, COUNT: let LENGTH =len(ARRAY$) /2 
let COUNT=1: while COUNT<=LENGTH 


let COUNT=COUNT+1: endwhile 
print "An array of ";LENGTH;" elements.” 


_ proc ArrayTest 


input ": ";COUNT 
if COUNT 


ArrayGet ; A$, COUNT 


ArrayStore; ANSWERS , COUNT, ANSWER+1 
let AS=ANSWERS: endif 


endwhile 


let COUNT=1: print "Frequency:-" 


Show; A$ 
endproc 


—_ 


local COUNT:ArrayDim;10: let A$=ANSWER$ 
print "Enter numbers between 1 and 10. 0 to finish" 
let COUNT=1: while COUNT<>0 


the individual elements. The procedures 
developed here help overcome this in 
various ways. With the appropriate data- 
handling procedures, the strings can be 
treated as a variety of different data 
structures. 

The simplest is probably the fixed length 
array, which always contains a fixed 
number of element values. More space 
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efficient options include a stack — in which 
numbers can be added or removed from 
the top of a list — and a queue, adding to 
one and removing it from the other. The 
most flexible, but also the trickiest to keep 
under control is the variable length array. 
Datacan be read, inserted or deleted from 
any point, and there is no need to waste 
storage space. 


ARCHIVE ANSWERS 


Each of these data structures has its 
benefits and limitations. It is important to 
match an application with the appropriate 
date structure, to maximize the benefits, 
and minimise the shortcomings. 

The savings to be gained could be 
considerable. If you need to store 50 
numbers per record, in 200 records, this 
would occupy some 80K by conventional 
means, and only 20K in fixed length arrays. 
lf youneeded up to 50 numbers per record, 
but on average only used 10 of them, it 
would still take 80K normally, while vari- 
able length arrays would use not much 
more than 4K. 


Using structures 


We shall now look at the nitty gritty of 
using these data structures. Encode and 
Decode do the maths of converting num- 
bers to two-character strings and back, 
and are needed for all of the data struc- 
tures. However you may never need to 
call these directly. Each data structure 
uses its own set of storing and extraction 
procedures, which obey a set of rules 
specific to the particular structure. While 
such rules can limit what any one array 
can do, they make the programming very 
much simpler. When designing the sys- 
tem, choose a data structure suited to the | 
task and stick to it. In this way, you can 
actually gain more freedom in the use of 
the data, since you can be sure of what is 
going on. It is one of the paradoxes of 
iprogramming, as of life, that as options 
,(and so complexity) increase, so the ef- 

fective freedom of choice tends to de- 
, crease. 

The first data structure we shall look atis 
the fixed-length array. There are three 
procedures needed here: ArrayDim to 
dimension the array; ArrayStore to store 
numbers; and ArrayGet to retrieve num- 
bers. The basic rule for a fixed-length 
array is (surprise, surprise) that you can't 
change the number of elements. When 
you dimension the array, you fix its length, 
and each element is assigned the value 
zero. This means it is quite legal to re- 
trieve elements that have not had anumber 
stored in them. The first three procedures 
of listing two perform these three tasks. 
The remaining two are demonstration 
procedures. Show will display the values 
held in any array passed to it. ArrayTestis 
a simple demonstration of one use of a 
fixed-length array. In this instance, there 
are ten elements in the array, and you are 
requested to enter as many values be- 
tween 1 and 10 as you like. For each 
entry, the existing value for that element is 
read, added to, and restored. In this way 
it monitors the frequency of each number 
pressed. 

In this example it is important that all the 
elements start off initialised at zero, so 
they can be added to, even on the firstcall. 
Itis also useful to be able to deal with each 
element by number. The procedure doesn't 


need to know which number was pressed. 
It can simply pass it on when getting and 
storing the frequency. One important point 
to note about these array strings is that 
they are not automatically put into your 
array variable. ArrayTest stores its array 
in A$. If you look at the occasions this is 
used, you will see that while you can pass 
A$ to a procedure (as in ArrayGet;A$, 
COUNT), it cannot pass it back. Instead 
the revised array is now in ANSWER$, 
which must be re-assigned to A$ (let 
A$=ANSWERS$). This must be done after 
any procedure which alters the array. In 
this case that means ArrayStore and 
ArrayDim. It is an unfortunate weakness 
with Archive parameters. Also note that if 
A$was afile variable, instead of amemory 
variable, you would also need to use the 
UPDATE command to make the change 
to A$ permanent. 

There are many occasions when fixed- 
length arrays could be useful. Anything 
where a fixed amount of data arrives ina 
variable order is ideal. For example, your 
students each have six essays to do dur- 
ing the term. You could set up a database 
with a six-element array for each student 
record, each essay title corresponding to 
anumber. As the essays are marked you 
could store the values against the rel- 
evant essay number. It would be fairly 
easy to devise procedures to search for 
unmarked essays (hopefully no student 
will get 0 percent as an actual mark), and 
to add up the totals for each student. 


The stack 


The next structure we shall look at is the 
stack. This is used a lot in low-level pro- 
gramming, and also in Forth, where it is 
the main data feature. The idea behind it 
is that elements can only be added to the 
top of the stack, or taken off the top (like a 
stack of plates in a cafeteria as the tuto- 
rials always say). Archive users are un- 
likely to want a multipurpose stack of the 
kind used in Forth, so rules to control 
stack use by different parts of a program 
probably don't apply. By limiting access to 
nothing but adding and removing, the 
programming is very simple, and it is very 
easy to keep track of the data. 

The stack is accessed entirely by two 
procedures, Push and Pop — the tradi- 
tional names given for adding and re- 
moving values. A stack is one of the 
simplest but also most limiting of data 
structures. 

Similar in both form and use is a queue. 

| The difference is that values are extracted 
from the bottom, instead of the top of the 
list. It is a first-in-first-out system. The 
procedures for aqueue are Push(the same 
as for the stack) and Pull which removes 
the bottom value. One use for a queue 
might be to co-ordinate a real queue ina 
doctor's waiting room. As patients arrive, 
their IDs are added to one end of the 
queue. Then each ID can be taken from 


40 


Listing Three 


proc Pull;ARRAYS 


proc Push; ARRAYS, VALUE 
if len (ARRAYS)<253 
Encode; VALUE 
let ANSWER$=ARRAY$+ANSWER$ 
else : print "Push: stack full" 
let ANSWERS=ARRAYS$: endif 
endproc 


proc Pop; ARRAYS 
local LENGTH: let LENGTH len (ARRAYS) 
if LENGTH>=2 
if LENGTH=2:Decode;ARRAY$: let ANSWERS="" 
else :Decode; ARRAYS (LENGTH-1 to ) 
let ANSWERS=ARRAY$( to LENGTH-2) 
endif 
else : print "Pop: stack empty" 
let ANSWERS="": endif 
endproc 


if len(ARRAY$) >=2 
Decode ; ARRAYS 
if len(ARRAY$)=2: let ANSWERS$="" 
else : let ANSWERS=ARRAY$(3 to ): endif 
else : print "Pull: queue empty" 
let ANSWERS="": endif 
endproc 


proc QTest 
local COUNT 
print "Enter numbers +/-32600, ending with 0" 
let FIFO$="": let COUNT=1: while COUNT<>0 
input ": ";COUNT 
if COUNT 
Push; FIFO$,COUNT: let FIFOS=ANSWERS$ 
endif 
endwhile 
let LIFO$=FIFO$ 
print "The numbers were:-" 
print tab 5;"FIFO"; tab 20;"LIFO" 
while len (FIFO$) 
Pull; FIFO$: let FIFO$=ANSWERS$ 
print tab 5;ANSWER; 
Pop;LIFO$: let LIFO$=ANSWERS 
print tab 20; ANSWER 
endwhile 
endproc 


the front of the queue, to show who is 
next, and then automatically posted in the 
consultation record. 

Either of these structures would also be 
ideal for any occasion where an unknown 


number of values need to be gathered, 
before being used to produce statistics. 
For example, an athletics event may wish 
to record lap times for each runner, in 
each race, Each runner's record would 
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Listing Four 


proc ArrayInsert ; ARRAY$, ELEMENT, VALUE 
* local LENGTH: let LENGTH=len (ARRAYS) /2 
if ELEMENT<=LENGTH+1 and ELEMENT 
Encode : VALUE 
if ELEMENT>1 
let ANSWERS=ARRAY$( to (ELEMENT*2) -2) +ANSWER$ 
endif 
if ELEMENT<=LENGTH 
let ANSWERS=ANSWERS+ARRAYS ( (ELEMENT*2)-1 to ) 
endif 
else : print "ArrayInsert: out of range" 
let ANSWERS=ARRAY$: endif 
endproc 


proc ArrayCut ;ARRAY$, ELEMENT 
local LENGTH: let LENGTH=len (ARRAYS) /2 
if ELEMENT<=LENGTH and ELEMENT 
Decode; ARRAYS ( (ELEMENT*2)-1 to ) 
if ELEMENT>1 
let ANSWERS=ARRAY$( to (ELEMENT*2) -2) 
else : let ANSWERS="": endif 
if LENGTH>ELEMENT 
let ANSWERS=ANSWERS$+ARRAY$S ( (ELEMENT*2)+1 to ) 
endif 
else : print "ArrayCut: out of range" 
let ANSWERS=ARRAYS$: endif 
endproc 


proc Prune; ARRAY$ 
local T, COUNT 
let COUNT-2:ArrayGet ; ARRAY$,1: let T=ANSWER 
let ANSWERS=ARRAY$ 
while COUNT<=len (ANSWERS) /2 
ArrayGet ; ANSWERS . COUNT 
if ANSWER=T: ArrayCut ; ANSWERS, COUNT 
else : let COUNT=COUNT+1: let T=ANSWER 
endif 
endwhile 
endproc 


proc InsertTest 
local N,COUNT: let AS="" 
print "Enter numbers, +/-32000. End with 0" 
let N-1: while N<>0 
input ": ";N 
if N 
let COUNT=1: let ANSWER=-40000 
while COUNT< “len (A$)/2 and N>ANSWER 
ArrayGet ; A$, COUNT 
if N>ANSWER: let COUNT=COUNT+1: endif 
endwhile 
ArrayInsert:A$,COUNT,N: let AS=ANSWERS$ 
endif 
endwhile 
Show; AS 
Prune;A$: let AS “ANSWERS 
Show; AS 
endproc 
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include a stack, into which was added 
each lap time. At the end of the race, it 
would be possible to find the fastest, and 
average laps of each runner, and use the 
same system for races of different lengths. 

Listing three contains the stack and 
queue procedures, plus a demonstration. 
This shows how the same data, once col- 
lected, can be used as either a stack or a 
queue, as neéds require. 

The final data structure offered here is the 
variable-length array. This uses both 
ArrayStore and ArrayGet from Listing two, 
adding procedures to insert and delete 
values anywhere inthe list. Ithas no inherent 
rulesin the way the others do, andis clearly 
of less use when the absolute position of 
the elements is important. However it is 
ideal where the relative value is significant. 
For example, you could insert each new 
number in ascending rank order, as dem- 
onstrated by the /nsertTest procedure in 
Listing four. Once numbers are in order it 
is very easy to check for duplicated values. 
The Prune procedure does just this, and 
prunes out any duplicates it finds. 

One important, but complex use for an 
array could be in a one-to-many relational 
database. Records in the main data file 
could store an array of reference numbers, 
for each of the subsidiary file records that 
relate to it. 

When entering the listings initially, you 
should add all four together into one pro- 
gram, as there are overlaps in the proce- 
dures they require. However when you 
come to use them in your applications, you 
could remove those you do not require, for 
the particular structures you need. Table 
one shows which procedures relate to 
each of the data structures described. 

Aword of warning may be in order regard- 
ing printing these array strings on the 
screen. Because they may include values 
below CHR (32), they can interfere with the 
screen driver and write rubbish, or gener- 
ate error messages. This is true even with 
a file variable using DISPLAY. You may 
need to customise the input screen, to 
remove such variables. 

It would be fairly easy, by just altering the 
Encode and Decode procedures, to con- 
vert all these procedures to handle a dif- 
ferent set of integers. If zero was posi- 
tioned at true zero, instead of at 32639, you 
could store numbers from 0 to 65000 in- 
stead. If only very small numbers were 
needed, you could, with rather more wide- 
ranging changes, use a single byte for 
each number, to store integers from 0 to 
255, for example. This would halve the 
storage area used. 

There is also scope for using other data 
structures, or access rules from those de- 
scribed here. Archive programmers are 
probably not used to thinking in terms of 
bytes of data, or required integer ranges. 
The vastness of the built-in numeric vari- 
ables shields us from that. However if your 
applications are too inefficient using these 
variables, the integer arrays described here 
could be the answer you need, 
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ArchEd Part Il 


: Stephen Mitchell continues with the second part of his Archive editor. 


n the last article we produced some 

file handling procedures that will 

enable you to link your dbf file to the 

ArchEd editor procedures that appear 
this month. This Editor runs within Ar- 
chive and enables you to edit the fields of 
your file to their full 255 character length. 
ArchEd will handle a file containing any 
number of fields without the need to cre- 
| ate special sedit screens. Arch Ed can also 
be incorporated within your existing Ar- 
chive procedures. Nearly all this month's 
procedures are prefixed by the letters w2. 
Typein the procedures givenin the listing 
using the Archive edit command and save 
it with the name given in the initial 
REMarks. Make sure you keep a security 
copy. 

The task of the w2 procedures is to dis- 
play each field in turn from the record 
selected by the file handling procedures 
and to enable individual fields to be edited 
as required. 

Before proceeding it is necessary for the 
w2g]1 procedure to be edited to the names 
of the fields in your file. A non-elemen- 
tary file structure is given as an example 
in procedure w2g2. The parameter 'n’ to 
this procedure simply indicates which 
field is to be assigned to the string vari- 
able s$. The fields of a file are numbered 
from zero, so if the fifth field of your file is 
called 'descriptions$' its field number is 4 
and so is the statement: 


if n=4: let description$=s$: endif 


must be included in w2g1. A statement of 
this form must appear for each of the 
textual fields in your file with the field 
numbers set as appropriate. The example 
shows how to code this structure in a 
reasonably efficient manner. Note that a 
gap will be present for any numeric field 
defined in your file. The w2g2 procedure 
can be deleted once w2g1 has been 
amended to reflect your file. 

As mentioned last month, if you havean 
expanding QL then you might like to try 
merging the editor and file handling pro- 
cedures and running them as a single 
loadable program. ArchEd runs some- 
what more efficiently in this form. 

ArchEd is run in the normal way by 
typing ‘run ArchEd ENTER’. The initial 
questions asked are those from the file 
handling procedures with which you 
should by now be quite familiar. When 
you have selected a record from your file 


you will be asked 'Do you want to EDIT 
this record?’. If the answer is 'yes' ArchEd 
will display the first textual field of the 
record. This field becomes the ‘current’ 
field and appears double-lined spaced at 
the top of the screen. The individual lines 
into which the current field is broken are 
knownas ‘components ' and itis these that 
are edited by the sub-edit commands (see 
below). Of course, the field may be shorter 
than the component length in which case 
only one line is displayed. The current 
field is followed by the next field (if this is 
textual) single-line spaced. The following 
editing instructions are displayed at the 
bottom of the screen: 


ENTER: Edit field (i/d/r/di=insert/ de- 
lete/replace/del & ins); (SHIFT) 1,2, ..., 
10: Accept field edit ord skip (-)n fields 
(cyclic); F4/F5: Abandon/Commitall field 
edits to current record and Exit; Rp Space 


enter: re-edit current field when at next 
component; <3 SPACES>: Accept field 
edit when at next component. 

Again, these are mostly self-explana- 
tory but the sub-editing commands re- 
quire further amplification by way of some 
examples. 

To perform any editing on the current 
field you must press ENTER. This causes 
the cursor to appear under the first char- 
acter of the first component of the current 
field. This left-hand end of the compo- 
nent is designated as the reference point 
and the sub-edit command is applied 
relative to this point. It is possible to de- 
lete, insert or replace characters within 
the component. For instance, consider the 
following component text: 


Allin a hott and copper sky. 


To correct the spelling mistake type 12 


proc start 


w2aled 
run “ArecnEde2" 
endproc 

proc wlzzhead 
print at @,@; 


paper 2;" "A RC 


if memory()<1200 


endif 
endproc 
proc w2aled 
REM "ARCHIVE EDITOR - 
REM Copyright 8.G.Mitchell 
toeal 1in,12,m,n,ft,2, upd, gol 
let L2=0 
let n=@ 
lel ft=numfld(} 
while n«ft 
let m=n 
de flelatin) 
let s$=rieldvi(n) 
let upd=8 
let gols1 
while got 
ola 
ink u 
wlz2head 
print at 19,8: ink 2;"“ENTER"; 
print ink 2;"1/d/r/di"; 
print at 28,0; 
print 
print at 
print : 
print at 
prink “ss 
print at 
print "; 
ink 6 
let linesli 
wZelem 
webidisp:n, 6,1 
w2fizn 
he ne+i</t 
if fieldt(n+1) 
let In=line 
let line=line+mod-6 


21,8: ink 2; "Fa/f5"; 
22,0:;"RP "; 


28. Bs. a 


webldispin+li, Pieldv(n+1}),@ 


REM Save this listing as ‘'ArchEd3_pre'. 


ME = 
print rept(" ".mod*3): "Memory ";memory(};" Bytes" 


print at 1,mod*3;"**WARNING** Memory low — Close & backup filet™ 


‘ARCHED’ Version 2.82 3/5/91" 


Accept field edit 


EOrrtToaR “ 


ink 4:"; Edit field ("; 


ink 4; "=(nsert/delete/replace/dei&ina);™ 
tnk 2¢“¢(SHEPT}1, 2y 6% 
“; Accept field edit & skip ¢ 


"gt ink 43°41"; ink 2; ta" 
In fields (cyclic);" 


": Abandon/Commit 11 field edits to current record & Exit;"” 
ink 2: "SPACE ENTER"; 

Re-edit current field when at next component:™ 

ink 2;"SPACE SPACE ENTER"; 


ee wo wr tt. 
raat 
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let linewln 
endif : endir 
print at 18,a;" ™ 
let z=@ 
while not 2 
let z=code(getkey() ) 
if 2=3¢@ 
weelediti2 
wedlas 
if e=fieldv(n) 
let upd=@ 
else 
let upd=1 
endif 
tf p3 or ago" * 


Let gol=o 
if n=ft-1: tet m=-1: endif 
endif 
else 
if 2-22 
let goi=8: let meft 
elee 
if z=21 
let gol=6: Let vpd-@: let m=ft 
else 
ig 4?7<z and z2<58 
let go1=8 
if z=48: let z=#58: endif 
let m=n'z Ug 
if m>=ft-1: let m=m-ft: endif 
alse 
1f 2=33 or z=64 or 2#3b5 or 2=36 or 2=37 or 
z=94 or 2538 or z442 or z=40 or z=41 
let goi-a@ 
2-33: let m=n-2: endif 
2264: let m=n-3: endif 
2235: let m=n-4: endif 
2-36: let m=n-5: endif 
z-37; Let m-n-6; endiP? 
z=94; let m=n-7: endif 
2=38: let m=n-8: endif 
ze42: let m-n-9: endif 
z=4@: let m=n-10: endif 
geHl: let m=n-11: endif 
m<-1: let m=ft+m: endif 
elue 
let z=@ 
endif : endif : endif +: endif : endif 
endwhile 
endwhile 
if updiw@glafjn: let i251: endif? 
endif 
det nem+1 
endwhile 
tf z2=21 and 12: back : next : let i?=@: endif 
1g 12: update ; endif 
wre] 2m 
w2flan 
let age" 
endproc 
proc w2bidisp;x, x#,a 
lecal f11,4%,m.n,9,1,1p,4219 
let fl1=f1-1 
df at let pl=i: let ar2 
else 
let qa=1l 
endif 
print at line,@; ink 4; fieldn(x)+":"; 
let le=Len{x#) 
4? ip=@: let x#=" "i: Let 1Ip=1: endif 
let m=1 
while m<=lp 
let nem 
if n+fli>ip 
let l-ip-n 
lel x1i$mx%{n to n+l) 
print at line. col:x1it 
let line=-linere 
ifa 
webzam; pil, xis 
let pepd+1 
return 
endif 
let l=fl1 
ig x€(n+L)<>" " 
while x$(n+l-1)<>" " 
let i-1-1 
endwhile 
let m=n+t 
let l=1-1 
else 
let m=n+1+1 
lel kelp 
while m<=k 
if x@{mj="""s let meme 
eleea : let k=m-1: endif 
endwhile 
endif 
while x#(n+*l-2)=2" " 
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spaces, denoted by dots, followed by a'd’: 


All in a hott and copper sky 
nesmanl™ 


and then press ENTER. The character 
above the 'd’ will be deleted when the file 
isre-displayed; in this case the second 't'is 
deleted. Each of the sub-edit options is 
performed in much the same way. These 
are now described. 

It is possible to delete a whole string of 
characters from a component by typing a 
set of consecutive 'd's. The words ‘planks 
did swell’ will be deleted from the follow- 
ing text:- 


And all the planks did swell; 
vessiesrsreeeedddddddddddd” 


To insert text ina component the cursor 
is again positioned relative to the refer- 
ence point. An‘i' is placed underneath the 
character in front of which new text is to 
beinserted. Forinstance the words ‘boards 
did shrink’ will be inserted to the right of 
the semi-colon in the following text: 


And all the ; 
weiner dDoards did shrink* 


Inserting text is the default for sub-edit 
commands. For example: 


And all the; 
veserereeeeesDOards did shrink” 


would have the same effect. The only 
exceptions to this are if the first character 
to be inserted is a ‘d’, ‘i’ or an 'r’. In these 
cases the initial ‘i’ is then obligatory. 
Text of equal length can be replaced 
character-for-character by placing the 
cursor underneath the first character to be 
replaced and typing an 'r’. The replacing 
textis then typed before pressing ENTER. 
In the following example the word ‘be- 
low' is replaced by the word ‘above’: 


Right up below the mast did stand. 
vaveonenaiees TADOVE™ 


A more usual requirement is to replace 
text of unequal lengths. This can of course 
be performed as two separate operations, 
viz, first be deleting the old tex and then 
by inserting the new (or vice-versa). 
However, it is possible to achieve this in 
one operation. The text to be replaced is 
first deleted, as described above, but be- 
fore pressing ENTER an ‘i’ is typed fol- 
lowed by the replacing text. For example, 
the words ‘Not much larger’ are replaced 
by the words 'No bigger' in the following 
text: 


Not much larger than the moon. 
ddddddddddddiNo bigger* 


Sub-edits are performed for each com- 
ponent of the current field. If a particular 
component requires no edit then simply 
press ENTER. The cursor will move to the 
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start of the next component. Once the last 
component has been edited and ENTER 
pressed the current field will be displayed 
in its edited form. The field in this new 
form can be edited again by pressing EN- 
TER and performing another set of sub- 
edits. 

This process can be repeated any number 
of times until the full text of the current 
field is correct. The numeric key 1 is then 
pressed to move to the next textual field in 
the record. Larger jumps of from two to 10 
fields can be made relative to the current 
filed by pressing the appropriate numeric 
key. To skip 10 fields use key 0. ArchEd 
considers the last field in the current record 
to be followed by the first field of the same 
record. As such the fields are arranged 
clockwise in a circle. Clockwise is synony- 
mous with positive progress around the 
fields. Pressing a numeric key that would 
skip beyond the last field will give a new 
current field at an appropriate number of 
fields from the beginning of the record. For 
example: 


Numbered fields on record = 12; current 
field = 10th; press 5; current field becomes 
3rd. (If the third field is numeric the next 
textual field becomes the current field). 


Similarly, pressing a SHIFTed /Key will 
move ArchEd anti-clockwise, with the last 
field following the first. This is the nega- 
tive direction, and a SHIFTed numeric is 
taken to mean minus that number of fields 
from the current field. Whatever numeric 
key is pressed, the edits to the current field 
are accepted and will be applied if the 
record is updated — see below. 


Movement 


Movement around the record in either 
direction can be repeated, During this cy- 
cling individual field edits can be ‘accepted’ 
any number of times. Once the record is 
considered to be correct it is ready to be 
updated. 

There are two 'rapid progress’ options 
available which allows you to jump out of 
sub-editing after any particular sub-edit, 
to any particular component. Both these 
facilities are useful once a certain amount 
of practice and familiarity with ArchEd 
has been gained. The first option causes 
immediate re-display of the current field 
with any sub-edits applied while the sec- 
ond accepts any sub-edits and moves im- 
mediately to the next field. A single space 
is used in the first case and two spaces in 
the second. To do this, a sub-edit to a 
component is first completed by pressing 
ENTER. The cursor will move to the ref- 
erence point of the next component as 
normal. If one space (or two, for the second 
option) is now typed and ENTER pressed, 
the appropriate action will occur. These 
options are obviously not applicable if the 
current field comprises only a single 
component. 


let l=-1-i 
endwhile 
let “1$=x$(n to n+1) 
print at line,col;x1$ 
let lLine=line+q 
ifa 
w2bzam;p4,x1$s 
let plepl+1 
endif 
endwhile 
endproec 
proc w2b2amin, x1$ 
if n=1: let m1l$=x1$ 
else : if n#2; let m2%=x1$ 
else : if n=3: let m3%=x1is 
eleae : if n=k: let mét=x1$ 


else ; if n=5: let m5$=x1$ 
if n=6: let m6$=x1s 


else : 
andif : endif : 
endif ; endif : endif 
endprac 
proc w2cledit; row : 
local 1,m,n,¢0,e8,v6,WE.r1$,r2¢ 
let 93=8 
Jet n=1 -- 
while n<p4& 
if n=i: let ri$=m1¢ 
else : if n=2: let rit=m2¢ 
elee : if n=3: let pitem3t 


endif 


elue : 


endif : 
endir : endif : 
let m=row+2*n-2 
let go=l 
while go 
input at m,col;e¢ 
let l=len{e$) 
ifoil 
if e$<>" " and ef<>" 1 
wee2type;e$," dt 
if pl: let go=xd 


endif 


else : if n=4: let rils=mis 

1f# n=: let rif=m5$ 
elee : if n=6: let ril$=m6¢ 
endif’ : endif 


if pi>l: Let v$=r1¢(1 to pl-1) 
else : let v$="": endif 


let e$=e%(pl to ) 
let p2=len(e$) 


14UT LOEINSUPVes, -i') 
iF 1 
let p2=1-1 
let e8=e8(1+1 to ) 
else : let et="": endif 
if len{ri$)<pi+p2: let we="" 
else : let wt=rl$(pl+p2 to } 
41f 2 
let pi=255-len({r1%)+p2 
if pl<256 
let e$=e¢(1 to pl) 
endif : endif 
let r2$=v$+e$+ws 
if r2g="": let r2¢=" ": endif 
w2e3an;n,72$ 
else 
wae2type;e$," r” 
if pl: let go=0 
1f pl>i: let v$er1$(1 te pl-+ 
else : let v$e"": endir 
let e$+e$(pi+l to } 
let p2+len(e$} 
if len(rl$)<pi+p2: let we="" 


+ endif 


i) 


else : let w-ri¢$ipl+p2 to }: endif 


let r2¢=v$+e$+w$ 
w2o3anin, r2$ 
else 
w2c2typeie$," i" 
if not pi 
let l-1: let p@=len(e$) 


while l<=p2 
1f e${1)=" "+ let lel+1 


endwnile 
endif 
if pl: let go=@ 


else : let v$="": endif 
let et-e$(pi+1 to ) 
if len(ri$}<pi: let we-"" 
else : let w$-ri$(p1 to 
let pl+255-len(rit} 
let e$-e$(1 te pl) 
let r2@=vE-es+wt 
w2e3an;n,r2$ 
endif ; endif : endif 
elae 
let go=8: let n=pf 
tf ets" : let p3=1: andif 
endif 


else 


if p2=255: let p2=254; endif 


elae ; let plel: let e$="i"+e$(1 to p2}: let l-p2+1 


if pi>i: let v$=r1$(i to pl-1) 


}: endie 
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lie a aka 


andif 
endwhile 
let nean¢1 
eandwnile 
endproc 
proc wee?type;x1$,*7$ 
let pl=inetr(™1$, x2$) 
if pl: let pl=pl+2; return : endif 
if w1$(1)=x2$(3): let pisl: return : endif 
if w1$(1 to 2)+x2e$(2 to 3): let pis2: return : endif 
let pl=8 
endproc 
prod w2cganjn, XLS 
At meas 148 NAPBKLE 
elee : Lf n=2: let n2s=x1t 
e¢lae : if n=3: let n3$=x1is 
elee : if n=a: Let nk$=x1l$ 
@lee : if n=5: let n5$=x1¢ 
else : if n=6: let n6#=x1is 
endif : endif : endif 
endif :; endif : endif 
endproc 
proce wrdlas 
local n,k 
if len(ni¢}: let mi$=ni$: endig 
if ten(n2%): let mag=en2¢: endif 
if len(n3$}: let ma¢=n3$: endif 
if len(n4¢}; let magen4d$: endif 
if Len(nS5$): let m5%=n5¢: endif 
if len(n6$): let m6¢-n6$: endirf 
let K=255 
let p2=len{m1$) 
if p2<k 
let pl=p2+tlen(m2¢) 
if pi<k 
let p2=pl 
lat pl=p2:lenim3¢) 
if pix<k 
let pé=pl1 
let pl=len(m4¢) 
if pt 
let plep2+p1 
if pi<k 
let p2=pl 
let pl=p2+len(m5$) 
if pi<k 
let p2=p1 
let pl=p2+len{m6$) 
if pi<k 
let s$=m1$+m2$+m3s+mbs+m5$+m6$ 


endif 
else : let s$=<m1$+m2$+mas+mhs+mS8(1 ta k-p2) 
endif 
elee } let a$=m1s+mzZ$+mge+mus(1 to k-p2) 
endir 
elee : lel pe=mlg+m2$+m3$ 
andir 
elee ; let s$=m1$+m2$+m3$(1 to k-p2) 
endif 
else : let s$=mi$+m2$(1 to k-p2) 
endif 
else : Jet sa$=m1$ 
endir 
endprec 
proc weelzm 
lat mi¢-"": let m2¢="": let m3g="" 
let mége""; Let m5¢="": let m6e="" 
endproc 
peoc wéflzan 
let nlg=""; let n2g="": let n3gett 
let nig-""; Let n5¢-"": let n6ég="" 
endproc 
Proc weglafin 
if n<3 
if msl: let fieldl$=e¢ 
else : let field2¢eet: endif 
elee 
if n=3: let field3#-a¢ 
elee@ ; Let rleldds=ss: enair 
endif 
endproc 
proc w2g2afin 
if n<4 
1f n-@: let Title@=<s$: endif 
if nel: let Fname$=<s¢: endif 
if n=2: let Sname$es$: endif 
if m=3: let Surnamefes$: endif 
@lmae 7; if n<g 
rem n=4 'Num', omitted numeric field, 
if n=5: let Houses=e$: endif 
if n=6: let Streef$=s$: endif 
if n=7: let Town@=s¢: endif 
ie n=8&: let County$<s%: endi? 
else 
it n=#9: let Post§<s$: endif 
if n#18: let Country$«s$: endif 
rem nell 'Index', another numeric field. 
if n=12: let Phonet-s8: endie 
if n=13: let KeyS=s$: endif 
endif ; endif 


: | Two 'while' loops control the presentation 
endprod 
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elee : let s$~-mi¢+m2$+m3$+mi$+m5$+m6$(1 to k-p2) 


ARCHED 


| A ‘quit’ function is provided by pressing 
key F4 which abandons all the edits per- 
formed for all the fields of the current 
records during this editing phase. This 
would normally only be chosen if it was 
suddenly realised that the wrong record 
was being edited. A record is updated (ie 
the edits committed) if key F5 is pressed 
between field edits. A quit or an update 
causes a return to be made to the record 
selection process. 

A few words of caution are now given, 
both on the use of ArchEd and the subse- 
quent use put to an 'ArchEd' edited file. 

1. There are two instances in procedure 
w2bldisp where an unrecoverable ‘string 
subscript’ error (Error 77) can occur, caus- 
ing ArchEd to fail. Both these errors arise 
when the procedure is performing a back- 
ward search along the current field to lo- 
catea particular character-the firstinstance 
involving a search for a space and the 
second for a non-space. The error is avoided 
if fields never contain strings of 48 (or more) 
consecutive spaces or non-spaces. 

In standard text this is never the case, so 
this error should never be a problem. If the 
error occurs processing control immedi- 
ately passes from the procedure to the 
standard command level of Archive. All 
but the last field edit to the current record 
can be applied if an Archive update com- 
mand is given immediately. The update 
must be followed by a ‘close’ on the file 
before ArchEd or your own procedures 
are restarted. 

2. Itis possible to insert a string of (up to) 
the full length of the Archive input buffer 
into the current component. The same is 
true when replacing text although once the 
component length has been exceeded the 
excess replacing text is treated as insertion 
text. In both these cases any following 
components, starting with the last, will be 
pushed off the end of the field to accom- 
modate the inserted text. However, in- 
serting such long strings tends to be im- 
practical since the inserting text tends to 
obliterate the text of the following compo- 
nents as shown on the tv monitor screen. It 
is better to insert part of the text, redisplay, 
and then insert the rest of the text. 

3. The Archive ‘alter’ command restricts 
field displays to less than screen width in 
much the same way that sedit fields were 
originally restricted to screen width. Ex- 
cess text over-writes the initial text of an 
‘alter’ field and it is almost impossible to 
assess how CTRL&<- or CTRL&-> changes 
affect the field data. It is there fore better 
not to use ‘alter’ on ArchEd edited files but 
to use only your own application proce- 
dures or ArchEd to make further changes. 

The following descriptions can be skipped 
if you're not interested in the inner work- 
ings of the 'ArchEd' Procedures. 

The w2 editing procedures have the fol- 
lowing structure and function: 

1. aled is the controlling procedure for 
editing an individual record from the file. 
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of each field of that record, via a work 
variables s$, to two subordinate proce- 
dures. The first of these procedures is 
bldisp, whose task is to split the current 
field into components and display these 
on the screen. The second, cledit, is the 
heart of ArchEd, and handles the editing of 
the component strings of the current field. 
Upon return from a cledit a call to dl as 
sets the value of s$ to the ‘after’ images (see 
3 and 4 below) resulting from the edit. 
Upon exit from the inner ‘while’ loop, and 
slike that a meaningful edit has been ap- 
plied, s$ is assigned to the current field by 
a call to glaf. Dependent upon the type of 
exit from the outer ‘while’ loop the current 
record is updated. Finally, the component 
strings and s% (all global variables) are set 
to ‘null’ in order to save space upon exit 
from Arch Ed. 

2. bldisp has two main tasks. These are 
firstly to split up the current field into 
component strings and secondly to dis- 
play them, double-line spaced on the 
screen. The procedure is also used to dis- 
play the field following the current field, 
this time single-line spaced. 

3. b2am is called by bldisp to assign the 
component strings to the six string vari- 
ables ml$-m6$. These variables are the 
‘before’ images of the field. Six other vari- 
ables, n1$-n6$, are used during the editing 
process as the ‘after’ images of the field. 

4. cledit controls the editing, of an indi- 
vidual field from the current record. Two 
‘while’ loops handle the editing of the com- 


ponent strings. The first selects the next 
component and assigns it toa work string 
(r$). The second both validates and actions 
the sub-edit commands (i/d/r - insert/ 
delete /replace) to the workstring. A call to 
c2type assists in this task. The edited work 
string is assigned to the appropriate ‘after’ 
image variable by a call to c3an. 


Convoluted 


There were a number of problems I en- 
countered while writing these procedures. 
These mostly stem from the somewhat 
restrictive nature of Archive's particular 
dialect of Basic. 

Not having array processing at my dis- 
posal has lead to some necessarily convo- 
luted techniques to achieve the desired 
results. These techniques have themselves 
contributed to the slowness of the proce- 
dures in their efforts to perform the edits. 
Certainly if improvements to Archive Ba- 
sic were forthcoming from Psion these 
procedures would undoubtedly benefit 
both in an increase in speed of operation 
and a cut-back in the amount of storage 
they occupy. For instance, the ability to 
assign a value/string directly back to a 
particular (non-named) occurrence of a 
field as in, for example: 


‘let fieldv(n)=x$'. 


However, this is not a valid assignment 


statement in Archive. Examination of the 
procedures will show the protracted na- 
ture of the coding Archive labours through 
to achieve this simple task. 

You'll also notice that I've made no use of 
the error command. During development 
I noticed that when such error-governed 
failures occurred memory used by the er- 
ror trapped procedures was not fully re- 
leased for re-use. Designing the procedures 
based on the error command, to control 
certain processing, led toa gradual loss of 
memory ~a sort of ‘creeping amnesia’, one 
might say. | have there fore outlawed their 
use in procedures what I've written other 
than where memory was never likely to be 
a problem and then only in cases of true 
fatal error processing. 

Having stated these criticisms | do how- 
ever recognise the restrictions in develop- 
ing a tool like Archive to suit all require- 
ments and accept that the many facilities 
within Archive represent terrific value 
especially when one considers that Archive 
was bundled in with the QL. Any im- 
provements that were to have come Ar- 
chive’s way given that it was to be con- 
tinually developed, would no doubt have 
negated the need for ArchEd;a slicker way 
of handling text strings would be now (no 
doubt) have existed. 

Hopefully, if you have had any difficul- 
tiesin using Archive, especially in this area 
of text handing, then you will turn back to 
it afresh — armed with ArchEd at your 
fingertips. 


C.G.H. SERVICES 


Cwm Gwen Hall, Pencader, Dyfed, Cymru, SA39 9HA (Tel. 0559 384574) (1pm - 9pm) 


COMMERCIAL SOFTWARE PUBLICATIONS 


ANELPUM QUAT (NICK WARD) (text adventure) (128k) [flpsmdy) £10.00 Ol TECHNICAL REVIEW ISSUES 1-2 £1.50 EACH 
ASSAULT AND BATTERY (DAMON CHAPLIN) (shoot em up} (128k) {flpmdvi £12.50 ot TECHNICAL REVIEW ISSUES 3.6 1, a EACH 
ASTRO INICK WARD) (astrology prog) (128k) iflp’mdv} £12.50 aad Mee ae = lee 

THE BLAG2 (TONY WOOLCOCK) (text adventure] {256k} (fipimdy) £10.00 TERE EER CUE Gc ee 
D-DAY MKII (DDC & RICH MELLOR) wargame} (256k) (ip) £15.00 INTERNATIONAL G2 REPORT ISSUES 1-2 £° 50 EACH 
QOUBLE BLOCK (FRANCOIS LANCIAULT) [arcade game} (128k) (flp‘madv) £10.00 QL SURVIVOR'S SOURCE BOOK £2.50 EACH 
OREAMLANDS (JEAN-YVES ROUFFIAC) (lext adventure) (256k} (fip} £10.06 

FIVE GAMES PACK 1 (WAEFORD DAVIES) (mind games) (128k) {flp) £12.50 

FROM THE TOWER OF VALAGON (ALAN PEMBERTON) itextadventure} (128k) ifipmdvy} 
£10.00 

GEE-GEE SYSTEM (PHIL JONES AND ANDY CSERBAKOIN (race predictor) (128k) [flp’ 
mdv} £10.00 

GREY WOLF (OLIVER NEEF} (u-boat simulator) (256k) {flp) £10.90 

HERE WE GO (PHIL JONES AND ANDY CSERBAKOI) itext adventure) (128k) (fipmdy] 
£10.00 

MACSPORRAN'S LAMENT (DAVE WATSON} (illustrated taxt adventure) (128K) (fip‘mdy} 
£10.00 

OPEN GOLF (OLIVER NEEF) (golf simulator) (384k) (tip) £12.50 

ORBITING STARS (JOHN TOPHAM} (astranomical simulator) (128/256k) {flp‘mdyvi £10.00 
PERSONAL FINANCE MANAGER (JASON VICINANZA) (budget system) (128k) (flp‘mdy} 
£10.00 

POLYTEXT (NICK WARD) (multi-colurmn quill) (128/256k) (flp‘mdv] £17.50 

PUOGE [DAMON GHAPLIN) (arcade game} (128k) (flp'mdy) £12.50 onne . 4 - 

QUICK MANDELBROT [KENNETH MURRAY ifractals| (128k) (flpsndy) £10.00 EUMAMLEL ICRBECCE DS sitios stroun save aed print page, 2010 a Melba til Hest 
QUICK MANDELBROT & JULIA (KENNETH MURRAY} (fractals) (728k} (fip/mdv} £12.50 ESTERS DISK * (rcludes DI¥ Syram.d constuction arog, Biarythms and Psychology progs! 
QUIZMASTEA (PHIL JONES AND ANDY CSERBAKOI) (quiz game) 128k) [flp:mdy} FRAC TAI e bish 1 tinelades large numoers of Tard eorot and other tracta progsi 

e10.00 FRACTALS DISK 2 |Carl Cron n’s Mandelbrat prog plus an matian screws 

QUIZMASTER FRACTALS DISK 3 [Rainer Kowaili mandelorst prog as amended to give “Jewel” eHact) 
mdv} £12.50 GAMES DISK 1 linc udes Starb-rs em Frenzy 


} ; 7 GAMES DISK 2 [ine udes many a‘cace type games: 
RETURN TO EDEN (OLIVER NEEF) (role-playing illustrated adventura) (256k) ({lp} £17.50 GAMES DISK 3 inc udes GL War 


ALL PRICES INCLUDE MEDIA AND POST AND PACKING FOR THE LIK 
PLEASE ADO 10% FOR OADEAS IN EUROPE; 2% OUTSIDE OF EUROPE 
PLEASE INDICATE 3.5°6.25°MDV VERSIONS WHEN ORDERING 


PUBLIC DOMAIN AND SHAREWARE LIBRARY 
ALL DISKS £2.00 EACH INCLUSIVE OF MEDIA AND P&P 


AOVENTURE GAMES DISK 1 iimcludes famasia ard ye classica type adverture) 
AOVENTURE SOLUTION DISKS 1-3 (inciudas Tra Pawn and Martvil a Manor. maialy ST though!! 
ASVENTURF SOLUTIONS DISK 4 (OL 5 specitic) 
AOVENTURE GAMES SOURC OSE DISK 1 jinc udes Fantasia, Haunted House, ete | 
ASVENTURE UTILITIES DIE judes Quil! ta SuperBasic conve-ter and demo adventure; 
AJSTRALIAN P.D. DISKS 1 - de a wide var ety of games, utilities etc i 
COMMUNICATION DISK * tircludes QBOX Bullen Board sysla" a) 

MMUNICATIONS DISK 2 jincludes Qi Kermit) 
CONNECTIONS DIS* 1 i-ncl.oes ST - Ol. screen and file converters) 
SEVICE UTILITIES DISK * tincludes Archiving. conipacting. formating anc Shel: programs} 
DILWYN JONES BISK 1 neludes mary: erBasic progs aod Werdseares| 
EDITOAS DISK 1 tircludes QED and Micraé macs! 


l(AS ABOVE & RICH MELLOA] (quiz game + module option) (128k) [flp: 


SECTOR X (HORST SPIERLING) (shoot ‘em up) (256k) (fp) £12.50 imdv) £15.00 
SPEEDFREAKS (DAMON CHAPLIN} (car race gamej (128k) (flp:mdvi £12.50 


sq 
£15. 


IbGY ROU 
oo 


NO THE WORLD (MICHAEL CROWE; (arcade game} (flo) £12.50 [mdy} 


STARPLOD (ALAN PEMBERTON} ticon-driven adventure} (128k) {fp mdyv} £10.00 


UNCLE LOOMIE'S LEGACY (DAVE WATSON (puzzle adventure} (12 


VOYAGE OF TI 


£412. 


WRI 
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@k} (flp:mdv) £10.00 
HE BEANO (ALAN PEMBERTON) iillustrated text adventure} (256k) (flp] 


NICK WARD} (arcade adventure) (128k) (fip’mdy} £10.00 


CLIP ART 1 - SPORTS (FLP) £6.00 

CLIP ART 2 - WHIMSIES {FLP) £6.00 
CLIP ART 9-0 
CLIP ART 4 -¥ 


FFICE iFLP} £6.00 
Z (FLP) £6.00 


GRAPHIX ANIMATION DISK 1 i"Maviploa’) 

GRAPHIX GEMQS5 QISK 1 (1900 many 19 list'y 

GRAPHIX SCREENS ‘GIF FORMAT) DISKS 12.5 

GRAPHIX SCREENS (PIX FORMAT) DISK * 

GRAPHIX SCREENS (SPECTRUM DISK 1 

GRAPHIX SCREENS (STi DiSKS 1,2.3 

GRAPHICS-SCREEN UTILITIES B'SK 1 linciudes sprite des gner, CAD ano windows orags.| 
HAM AAD SISK * (includes PC conversiorsi 

INDEXES OISK 1 (includes GL Word and QUANTA indexes) 

MATHS AND CALENDAR BISK * (includes calculator, pi ane calerdar creater progsi 
OLIVER FINK DISK 1 / noluces progs requirng Pointer envirennert io wark} 

PAINTER UTILITIES DISK 1 [includes label creators and printer tutoria 51 
PROGRAMMING DISK * tincludes GL PROLOG! 

PROGRAMMING DISKS 28 !CS8 Compiler} 

HALF BIEDESMANN CISKS 4+ 2 (excelent collection ct programs, games, Ju ities etc. i 
RECHEAT/ONAL MATHS DISK / ncludes Ife cellular aulor-alans etc] 


SUPERBASIC UTILITIES DISK - 7 Jincludes large numbers of utility progs. taglaits. procedures etc. 

TEXT DISKS | - 7 (Tne Bible! 

TEXT DISKS 6 - 9 [Camputer Jargon) 

TEXT DISK 14 (400+ Businass Leners trom U.S.A.) 

Please note the above ara only part of our PO. Library. New pvegrams are constavily beg addec ard more 
are always waleame. Plaase sencanS 4 E.fortul catalogue, Pease acd postage as for com mercia sottware. 
We can alse suaply cammercia’ software for STs and Amigas 


Sinclair/QL World November 1991 


CLIP AFIT 5 . GENERAL (FLP} £6.00 


SPEEDSCREEN - ROM VERSION £20.00 
SPEEDSCREEN - FLP/MDY £10.00 
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NEW FROM DIGCTAL PREC TS (ON 
CPORT BASIC TO C PROGRAM TRANSLATION SYSTEM 

This program translates SuperBASIC programs directly 
into C source code, automatically! If you want to 
move programs into C for migration to other 
hardware, or want to get your programs running 
faster, or simply want to learn C the easy way 
(chuck BASIC in one end and examine the C that spews 
out the other), CPORT is the system for you. CPORT 
is extremely friendly, easy-to-use and tolerant of 
poorly-written BASIC, There is even a method of 
dealing with BASIC toolkits. The C it will generate 
is very readable, human-like and is often optimal. 
Of course, the better the quality of the BASIC you 
put in, the better the clarity of the C that will be 
generated. But don't misunderstand - even if your 
BASIC is a rats-nest of GOTOs and GOSUBSs, CPORT 
won't mind. Usually, the generated C - which can 
even be switched between the ANSI and Lattice 
(K&Rish) industry standards — needs no tinkering 
with. The only conditions worth mentioning are that 


there must be no computed branching (e.g. GOTO 
3*¥+L), no interpreter-only commands (LIST, EDIT, 
RENUM etc) and that if the program contains any 


PROCs or FNs (as it probably will}, there mustn't be 
a GOSUB as wel! - not restrictions at all. CPORT is 


an amazing program, making breakthroughs in Al, 
CPORT is available om its own or together with the 
acclaimed C68 compiler, 

SUPERBASIC MONITOR 

Yes - this program monitors and reports on the 


performance of SuperBASIC programs as they run (i.e. 
dynamically) under the interpreter. Even if you only 


vecastonally tinker, this one you must have! Ideal 
for use with XREF, BETTER BASIC, TURBO etc. 

KREF v2.0 

An ineredibly competent program analyser — 
structure, the dynamic call hierarchy of 
procedures/functions, step-ladder report, glossary, 
warnings, Variable usage and sa on, I[deal with 
SUPERBASIC MONITOR, BETTER BASIC, TURBO etc. 

QMON v2.05 

The ultimate version of Tony Tebby's superb 


machine-code Monitor, An absolute must for those who 
really want to know what's going on in the QL. £10 
off if you return the old Digital Precision Monitor. 


COMPARE 

This little gem compares 
great speed, and allows 
auto- and semi-auto mode. 


files (data or program) at 
shuffles and alignment in 
You cannot do without it! 


MEGA DICTIONARY 

If you have over 1.SMb RAM (Goldcard, some ST/Thor) 
this is the ultimate PERFECTION PLUS accessory, 
enabling the best possible  spellchecking. it 
contains approximately 360,000 words, which really 
says it all. Another attraction of this masterpiece 
-—we will soon be announcing a suite of programs 
enabling sophisticated user-controlled access to the 
dictionaries and giving previously unsurpassed power 
at all sorts of word-handling (crosswords, anagrams, 
missing letters/groups, properties, all sorts of 
board and TY games). So get the Mega Dictionary now! 


SPELLCHECKER 

SPELLCHECKER works with and without PERFECTION. 
SPELLCHECKER can always spellcheck files ~ either 
PERFECTION format or plain ASCII (Quill or text87 
export files, for example). If PERFECTION is 
present, SPELLCHECKER can also selectively 
(pages/blocks/all) spellcheck the current document, 
or spell as you type. Peak spellchecking speed is 
over 35,000 characters per second on Goldcard even 
with the Mega Dictionary, and a cracking 3 pages per 
second on ordinary Qls. SPELLCHECKER comes with two 
ready-made dictionaries (the bigger is for 640K or 
bigger setups) and a system for creating and 
maintaining (add/delete/edit/view) user 
dictionaries. Further, you can spellcheck using | or 
2 dictionaries — typically a supplied one and a user 
one ~ you can even specify which is to be used first 
when checking! So if you bought PERFECTION without 
SPELLCHECKER and now want to add it, or even if you 
do not have PERFECTION at all, this is the product 
for you! 


QMATHS MATHEMATICAL SYSTEM 

An incredible mathematical compendium for the QL. 
Pride of place goes to the symbolic problem 
solver..u, It can solve problems, simplify 
expressions, factorise, expand ete ete —- all 
symbolically! If you could sneak this one into a 
maths examination (school /GCSE/O/A/S/undergraduate) 
you would have a formidable ally. It knows about all 
the algebraic operators, powers, roots, brackets 
(any number), trigonometry, matrices, determinants, 
vectors, factorials, perms and combs, binomials, 
exponentials, logarithms, hyperbolics, inverse 


functions, infinite series and their approximations, 


y | 


AODIGITAL PRECISION: 10 


ja 


AMODIGITAL PRECISION 10 


y ja 


A DIGITAL PRECISION 10 


A) 


A DIGITAL PRECISION: 70 


Mf 


Mf 


Ci i 


OO 


complex and imaginary numbers, conversions, and even 
calculus - both differential and integral (even 
knows definite integration, integration by parts 
etc)! And when the program is working something out, 
you can opt to get it to display some or all of the 
steps either All this is accompanied by a superb 
interactive tutorial. So whether you have been 
terrified of maths or are a boffin, this is the 
program for you: no mathematical skills are assumed 
or needed. Whether all you want to do is compute 2+2 
or d/dx((sin(x)+x.1og(x})*(x* (g(x)))).  QMATHS will 


do it. There is nothing like this available on any 
computer. In addition to this program, the package 
also contains an interpretive, fractal 


language with loads of beautiful 
fractal programs supplied for you to use, modify ar 
adapt. No programming skill is assumed or needed. In 
addition, there is a multiple precision floating 
point maths package - allowing calculations with all 
the QL functions at precisions up to over 600 
decimal digit accuracy (that is not a misprint) and 
very fast too. In addition, there is a 3D surface 
modelling program and lots of calculating routines 
to perform all sorts of algebraic and statistical 
computations in your own BASIC or Abacus systems. 
This is an incredible package. 


image-generat ing 


PROFESSIONAL PUBLISHER TOOLBOX PART TWO 

Tid you think we'd stopped? Anather blisteringly 
good callection of fonts and utilities for the 
Professional Publisher user, augmenting and adding 
to the first toulbox, You really should have both, 


HARDBACK + FINDER 
JHE hard clisk utility. 


RECOVER 
Recovers lust Archive databases. 
Media Manager Special Edition. 


Ideal companion for 


ARCHDEV + RTM 
The Archive development environment — gives enhanced 
speed, greater workspace and a cleaner boot system. 


DATABASE ANALYSER 
Fast statistics about your Archive database(s). 


ARCHIVE TUTORIAL 
Everything you always wanted to know about Archive - 
but were afraid to ask. 


NAMES + ADDRESSES 

MAILMERGE 

DAT—APPOINT 

Names and addresses, mailmerging and appointment 
diaries - sophisticated, fast and ready to run under 
Archive. If you've never used your Archive, now is 
the time to start! 


SEDIT 

SCREENPRINT 

Creates/edits and prints 
Archive. An invaluable aid. 


screen-format files in 


PEDIT 
A fast, sophisticated printer driver manager for the 
Psion programs — replaces the free one! 


CASH TRADER v3.0 INCLUDING ANALYSER 


PAYROLL 
An accounts system for the small and medium-sized 
business, with lots of excellent reporting and 


management facilities. Aimed at the layman. 
PLEASE SEE PAGE 10 FOR SPECIAL DEALS (YOU CAN SAVE 
UP TO 25% ON THESE AND OTHER DP PROGRAMS), OTHER DP 
PRICES AND OUR TERMS & CONDITIONS. 


CPORT WITH C68 COMPILER ... aw SECIS: 

CPORT BASIC TO C TRANSLATION SYSTEM «0 we BRS 

SUPERBASIC MONITOR...» 1. + ee a + + 24.95 aT 
KREF v2.0 .. +» 29.95 aT 
QMON MACHINE CODE “MONITOR v2. 0s. . 49:95 at 
COMPARE .. ww ow « & « DES al 
WEGA DICTIONARY . 2... 2... 1... 29.95 er 
SPELLCHECKER . . Dee ne wo AGS. AT 
QMATHS MATHEMATICAL SYSTEM |. « 59.95 ¢T 
PROFESSIONAL PUBLISHER TOOLBOX PART THO. - 29.95 eT 
PROFESSIONAL PUBLISHER TOOLBOXES Leia « 49,95 eT 
HARDBACK + FINDER .. 1. 6 es » 49.95 ct 
BEONER kk fee me me ee ae wee ~ 19.95 al 
ARCHDEV + RIM 2... 2 2 ee ae 2 29.95 aT 
ARCHIVE TUTORIAL . . ie Se aoe am a PHS BE 
DATABASE ANALYSER «5 4 se ee 4 es ea « 19,95 aT 
NAMES + ADDRESSES . . . 78 ow = 1995 dT 
MAILWERGE . 2... us 19.95 «aT 
DAT-APPOINT ¢ 2-2 gM ew ee eww A « 19.95 dT 
SENT ¢.¢ 4 ew ee eh oe « 2H OT 
SCREENPRINT » . 00 2 lt ee ee 19,95 a 
PERIT .. ea ee a a ee ee ae 
CASH TRADER. v3. 0 * ANALYSER 4 cas + e ¢ 99595 cT 
PAYROLL . «sa 4 49.95 cT 
! Minimum 1.5Mh RAM: tonly available on ‘disk z 


Note: Some of the above had been available from PDL previously (usually earlier versions} 
Once-recorded cartridges £50/25; £75/50; £100/100 
Disk interfaces (6 months guarantee) only £39.95! 


